回 帖 发 新 帖 刷新版面

主题:我要急哭了

Dim a As OleDb.OleDbConnection
        Dim aa As OleDb.OleDbCommand
        Dim s As String
        Dim c As String
        s = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\我的文档\db1.mdb"
        a = New OleDb.OleDbConnection(s)
        a.Open()
        c = "DELETE A WHERE NO=1"
        aa = New OleDb.OleDbCommand(c, a)
        a.Close()
        MsgBox("OK")
运行后显示“OK”  但数据库NO=1还是在那里   郁闷死我了   没错误
高手帮忙看下

回复列表 (共1个回复)

沙发

c = "DELETE FROM A WHERE NO=1"
        aa = New OleDb.OleDbCommand(c, a)
        aa.ExecuteNonQuery()

我来回复

您尚未登录,请登录后再回复。点此登录或注册