早啊~
以下代码,Try的功能是实现了,但,在try的正常代码环节报错,不应该是有错误提示框才对,而我这里就有报错提示。
请问,如何纠正才能解决这个问题呢?
Dim cmd As new SQLCommand
cmd.C
try
cmd.CommandText = "select * from { ## " & username & " } where name = '" & username & "' and CptID = '" & cptid & "' and CptName = '" & cptname & "'"
Dim dt As DataTable = cmd.ExecuteReader
MessageBox.show(dt.DataRows.Count)
If dt.DataRows.Count > 0
MessageBox.show("该用户在线")
ck = True
End If
Catch ex As Exception
cmd.CommandText = "Create table { ## " & username & " } (name nvarchar(16),cptId nvarchar(16),cptName nvarchar(16) )"
cmd.ExecuteNonQuery
MessageBox.show("创建OK")
cmd.CommandText = "insert into { ## " & username & " } ( name,cptid,cptname) values ( '" & username & " ','" & cptID & "', '" & cptNAME & "')"
cmd.ExecuteNonQuery
MessageBox.show("赋值OK")
End try
[此贴子已经被作者于2014-4-25 9:09:19编辑过]