datagrid的即时刷新

最新推荐文章于 2021-11-07 23:02:55 发布

转载最新推荐文章于 2021-11-07 23:02:55 发布 · 107 阅读

0 ·

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/googlegis/archive/2009/08/06/2979061.html

本文提供了一个使用ADODB组件进行数据库操作的例子，包括插入和删除记录的具体实现方式。通过对VBScript代码的展示，帮助读者理解如何在应用程序中动态地与数据库交互。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

Dim temprs As New ADODB.Recordset
   Dim tempsql As String
   On Error Resume Next
    tempsql = "Insert into Users(Name,Psw,pow) Values('" & txtName.Text & "','" & txtPsw.Text & "','" & cmbPow.Text & "')"
    temprs.Open tempsql, conn1, adOpenStatic, adLockOptimistic
    Adodc1.Recordset.AddNew
    Adodc1.Refresh
    DataGrid1.Refresh

   Dim temprs As New ADODB.Recordset
   Dim tempsql As String
   On Error Resume Next
    tempsql = "Delete from Users where ID = " & Text1.Text
    temprs.Open tempsql, conn1, adOpenStatic, adLockOptimistic
    With Adodc1
         .Recordset.Delete
         .Recordset.Update
         .Recordset.MovePrevious
    End With
    Adodc1.Refresh
    DataGrid1.Refresh

本文来自优快云博客，转载请标明出处：http://blog.youkuaiyun.com/zhangjie_xiaoke/archive/2008/03/05/2151366.aspx

转载于:https://www.cnblogs.com/googlegis/archive/2009/08/06/2979061.html