dim myconn = New System.Data.SqlClient.SqlConnection() con="Server=locost(若是远程数据库就是写服务器ip地址) ;uid=sa;pwd=jaaa;database=bbb" (这是连接数据库的连接字符窜应该懂吧) myconn.ConnectionString = (con) myconn.open() dim dr as sqldatareader Dim sqlcmd As SqlCommand = New SqlCommand() sqlcmd.Connection = myconn sqlcmd.CommandText ="这里就是写你要执行的查询sql语句" dr=sqlcmd.Executedatareader() if dr.read then ‘这里查到数据库中有相同的数据
con="Server=locost(若是远程数据库就是写服务器ip地址) ;uid=sa;pwd=jaaa;database=bbb" (这是连接数据库的连接字符窜应该懂吧)
myconn.ConnectionString = (con)
myconn.open()
dim dr as sqldatareader
Dim sqlcmd As SqlCommand = New SqlCommand() sqlcmd.Connection = myconn
sqlcmd.CommandText ="这里就是写你要执行的查询sql语句"
dr=sqlcmd.Executedatareader()
if dr.read then
‘这里查到数据库中有相同的数据
else
’这里是查不到 你自己处理吧
endif
sqlcmd.disposemyconn.close()
这是我凭记忆打出来的 因为家里没有安装 docnet 可能有些事件或者方法会打错。请不要复制 粘贴过去。