VB6.0用recordset对数据库进行的更新操作
2007-11-29 20:13
288 查看
Dim num As Integer
Dim sql As String
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim com As ADODB.Command
Set cn = New ADODB.Connection
cn.CursorLocation = adUseClient
num = Val(Text1.Text)
sql = "update articleinfo set state='正常'where id=" & num & " and lendoutperson='无'"
cn.ConnectionString = "Driver={SQL Server};Server=MICROSOFT01;UID=sa;PWD=sa;Database=articlemanaged"
cn.Open
Set rs = New ADODB.Recordset
rs.ActiveConnection = cn
Set com = New ADODB.Command
Set com.ActiveConnection = cn
rs.Open sql, cn, adOpenKeyset, adLockOptimistic
cn.Close
Set cn = Nothing
用recordset对数据库进行的更新操作
Dim sql As String
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim com As ADODB.Command
Set cn = New ADODB.Connection
cn.CursorLocation = adUseClient
num = Val(Text1.Text)
sql = "update articleinfo set state='正常'where id=" & num & " and lendoutperson='无'"
cn.ConnectionString = "Driver={SQL Server};Server=MICROSOFT01;UID=sa;PWD=sa;Database=articlemanaged"
cn.Open
Set rs = New ADODB.Recordset
rs.ActiveConnection = cn
Set com = New ADODB.Command
Set com.ActiveConnection = cn
rs.Open sql, cn, adOpenKeyset, adLockOptimistic
cn.Close
Set cn = Nothing
用recordset对数据库进行的更新操作
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- python对MySQL进行数据的插入、更新和删除之后需要commit，数据库才会真的有数据操作。（待日后更新）
- 使用Java对数据库进行基本的查询和更新操作
- Java -- JDBC 学习--通过Statement进行数据库更新操作
- 关于Jpa使用Update方法进行更新操作，却没有同步到数据库的原因
- 有关MFC ODBC类对打开的CRecordset数据集无法进行更新操作释疑
- Windows任务计划 定时执行PHP代码及扩展(对数据库进行更新操作)
- java连接数据库后进行更新插入操作
- Sqlserver 在查询分析器里如何访问远程的的数据库，进行数据查询更新等操作。
- VC++下使用ADO操作数据库的智能指针_ConnectionPtr、_RecordsetPtr、_CommandPtr的方法
- 转载:LINQ to SQL更新数据库操作
- iOS 使用FMDB进行数据库操作
- VC中使用ADO进行数据库操作
- android SQLite使用SQLiteOpenHelper类对数据库进行操作
- MFC中利用ADO对数据库进行简单操作的实例
- 数据库操作中使用事务进行提速
- 在Spark 1.2.0的spark-shell中进行Hive数据库的操作
- sql server 还原数据库时提示：数据库正在使用，无法进行操作的解决方法
- listview中点击item进行Item中的控件更新操作。
- 使用DataSet对数据库进行增、删、改操作
- ASP入门（二十三）- 数据库插入、更新和删除操作