VB中引用ADO2.8，打开数据库后如何更换sql语句就是查询新的语句

Dim RS As ADODBRecordset

Set dbRecCamera = New ADODBRecordset

RSOpen "select ", conn, adOpenKeyset, adLockReadOnly 'sql查询

。。。

。。。

RSClose

RSOpen "select ", conn, adOpenKeyset, adLockReadOnly '新的sql查询

string cnn = ConfigurationManagerConnectionStrings["youSqlConn"]ConnectionString;

using (SqlConnection cn = new SqlConnection())

{

cnConnectionString = cnn;

cnOpen();

SqlCommand cmd = new SqlCommand();

cmdConnection = cn;

cmdCommandText = "update table set field='"+ 你的变量+"' where id="+更新条件;

cmdExecuteNonQuery(); //执行更新

}

这个Text5是干什么用的？不明白你想在Text2显示啥结果，

如是要在Text2显示“售价”，Text2Text=nsjg 不就得了。

========================================================

首先你确认数据库中有没有“售价”这个字段，如果有，那你应该加个判断返回有没有数据记录，如：

If KeyAscii = 13 Then

strsql = "select 售价 from 商品管理 where 代码='" & dmtm & "'"

Set rs = getrs(strsql)

If rsRecordCount > 0 Then

num = rs(0)

If Len(dmtm) = 0 Then

MsgBox " 请输入商品代码或条形码! ", vbOKOnly, "提示"

ElseIf num <> 1 Then

MsgBox " 对不起,商品库存中没有对应的商品! ", vbOKOnly, "提示"

Else

nsjg = rs("售价")Value

Text5SetFocus

End If

End If

If rsState = adStateOpen Then rsClose: Set rs = Nothing

End If

以上就是关于VB中引用ADO2.8，打开数据库后如何更换sql语句就是查询新的语句全部的内容，包括:VB中引用ADO2.8，打开数据库后如何更换sql语句就是查询新的语句、Sql Server数据库的更新语句怎么写Ado.Net的数据库更新语句又怎么写、VB中ADO对数据库的查询等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！