Dim sql As String = "select g_no from sssc
Dim dt As DataTable = func.GetDt(sql)
If dt.Rows(0)("g_no") > 0 Then
RunSql("update **********************")
Else
RunSql("insert into ************)
End If
问题出在 dt.Rows(0)("g_no") 0处没有行的时候 就报错了不会执行 RunSql("insert into ************),求大神告知解决办法~~~
谢谢了
------解决思路----------------------
dt.Rows.Count,这个可以得出现有行数
if dt.Rows.Count=0 then
RunSql("insert into ************)
else
if dt.Rows(0)("g_no") > 0 Then
RunSql("update **********************")
Else
RunSql("insert into ************)
end if
End If