执行sql query时，如果有机会出现DBnull....

counterking

当我执行sql query时，result 会有机会等于DBnull....那么我该如何防止出现error呢？请看红色hightligh的那行！

Dim credit As String

strSQL = "SELECT name FROM customer WHERE CUSID = '" + cusid + "'"

Dim cmd As New OleDbCommand(strSQL, oledbcon)

oledbcon.Open()
cmd.CommandText = strSQL
dr = cmd.ExecuteReader

While dr.Read
       credit = dr("credit")
End While

oledbcon.Close()

Return credit

ww2020

检查是否等于null..........

[ 本帖最后由 ww2020 于 10-11-2005 11:32 AM 编辑 ]

goatstudio

这样写:

credit = IIf(dr.IsDBNull(你的 column index), "", dr("credit"))

counterking

原帖由 goatstudio 于 10-11-2005 12:02 PM 发表
这样写:

credit = IIf(dr.IsDBNull(你的 column index), "", dr("credit"))

column index指的是。。。？

goatstudio

原帖由 counterking 于 11-11-2005 02:54 AM 发表


column index指的是。。。？

例如说你执行以下的 sql

SELECT field1, field2, field3 FROM table1

field1 的 column index 就是 0,
field2 的 column index 就是 1...就这样连续下去.

counterking

行了。。谢谢。。。。。。。。。。。。