SQLSetValue
DataRow的一个方法,直接向后台的某列写入数据,通常用来向未加载的列写入数据。
语法:
SQLSetValue(Filed,Value)
Filed:字符型,列名。
Value:要写入的值。
示例
假定员工表有个名为"CRC"的列,且此列并未加载。
向员工表当前行的"CRC"列写入某文件的CRC检验值,代码为:
Dim
dr As
DataRow = Tables("员工").Current.DataRow
Dim
val As
String =
CRCCheckFile("c:\data\1.doc")
dr.SQLSetValue("CRC",val)
如果要删除当前行CRC列的值,代码为:
Dim
dr As
DataRow = Tables("员工").Current.DataRow
dr.SQLSetValue("CRC值",Nothing)
当然我们可以自己编写SQL语句,通过SQLCommand执行之,一样可以实现向后台写数据的目的。
和SQLCommand相比较,SQLSetValue的优势是使用快捷简单,劣势是一次只能写入一个数据,大家根据需要选择吧。