VB6.0对数据库的增加删除查询(入门级别)

最新推荐文章于 2024-07-31 12:00:22 发布

chyvlcy123

最新推荐文章于 2024-07-31 12:00:22 发布

阅读量1.6k

点赞数 1

文章标签：数据库 vb microsoft sql server string sql

本文链接：https://blog.csdn.net/chyvlcy123/article/details/1907781

版权

Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim sql As String
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
sql = "select * from userinfo where username='" + chy+ "'"
cn.ConnectionString = "Driver={SQL Server};Server=MICROSOFT01;UID=sa;PWD=sa;Database=articlemanaged"
cn.Open
Set rs = cn.Execute(sql)

rs.close

cn.close

set rs=nothing

set cn=nothing

简单的对数据库连接操作

cn.execute(增加删除查询语句都可以写)

rs.fields(要取的第几列值).value 取出的是String类型的根据你的需要还得进行数据类型转换

如果要判断rs里是否有值可用 rs.eof or rs.bof 进行判断

入门级的编法建议以后改成connection查询recordset 进行增加删除修改