www.gsyw.net > 求一段VB+SQL代码的写法,sql语句作为变量

求一段VB+SQL代码的写法,sql语句作为变量

SQL = " update Table set fine26='" & gs & "' where Code='" & Text1.Text & "'" & IIf(A2="", "", " and fine25='" & A2 & "'")

查询结果如果只有一个值,可以用 val=conn.execute("select fileld from 表名 where id=1")(0) 如果有多个值,要用getRowss(),如 SQL="select * from 表名" Set Rs=conn.execute(SQL) arrA = rs.GetRows() 这样得到的是一个数组。

dim n2 as long n2 = (n2 and &H0F) + &H20

sql="select * from where 字段名='" & strt & "'"

adodc控件内含一个记录集对象,可以用来操作数据。 你可以直接用这个属性修改数据: adodc1.recordsource=你的sql查询语句 然后刷新数据: adodc1.refresh 或者 adodc1.requery 并用adodc1.recordset来访问获取的数据。

private sub command1() dim conn As New ADODB.Connection '声明一个数据库连接对象 dim connstr As String '声明字符串变量用来记录连接数据库的语句 dim rs As New ADODB.Recordset '声明个记录集对象 dim i as integer '记数器 connstr=""Pr...

SELECT Date ,AVG(A) AS A ,SUM(B) AS B ,SUM(C) AS C ,SUM(D) AS DFROM DataWHERE Name LIKE 'L_'GROUP BY DateName串接,不适合聚合函数,就不处理了。

rs.AddNew (SQL) 不是这样用的, 执行sql你用 rs.AddNew (SQL) rs.Update 两句话替换为 conn.execute(SQL)

先是定义一个字符串变量,然后把你要写的SQL语句赋给它。这时如果要把一些VB控件里的数据加进去也一样就是一个字符串联接而以,唯一要注意的是标点符号的使用如:' 这个符号,因为很多时候要用到这个,我碰到好多人都是这里出错了。例如:Dim st...

直接使用:EXEC sp_dropserver 'ITSV ', 'droplogins '就好了。VB代码不能用recordset来操作应该用链接独享去excute Dim cnn As ADODB.ConnectionSet cnn=new ADODB.Connection cnn.ConnectionString="Driver={SQL Server};UID=sa;PWD=111;DataB...

网站地图

All rights reserved Powered by www.gsyw.net

copyright ©right 2010-2021。
www.gsyw.net内容来自网络,如有侵犯请联系客服。zhit325@qq.com