Question

vb实时错误80004005

Answer 1

在mrc.Fields（1）=修剪（文本（1）文字），然后再添加一个mrc.AddNew
----------补充回答------------ -----
检查在您的项目中，最好的版本MDAC2.7更多的版本的MDAC参考。

Answer 2

Public conn As ADODB.Connection
Public BlOK As Boolean
Sub main()
Set conn = New Connection
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "./DbManage.mdb;Persist Security Info=False"
conn.Open
frmSplash.Show 1
frmLoad.Show
BlOK = True

End Sub

Answer 3

你的密码打错了吧

追问

追答

classes表是否存在，请检查

追问

存在的哦，在数据库中。求大神指导

追答

strsql = "select * from classes"

myrecordset.CursorLocation = adUseClient ''''一定要设置为客户端游标，一：为了DATAGRID显示数据；二：提高性能 如果不设置游标，则无法显示数据，极为重要！经常出错！

myrecordset.Open sqlod, conn, adOpenStatic, adLockOptimistic

Set dbGridshow.DataSource = myrecordset
dbGridshow.Refresh

追问

我还想问下就是说新增记录时，我的代码
Dim strSql As String
strSql = "Insert into student(number,name,"
strSql = strSql + "age,class)"
strSql = strSql + " values('" + txtnumber.Text + ","
strSql = strSql + txtnam.Text + "','"
strSql = strSql + txtclass.Text + "','"
strSql = strSql + txtage.Text + ")"这个单引号，逗号的怎么用？和int，char有关么？

追答

　　INSERT INTO 语句用于向表格中插入新的行。

　　语法
　　INSERT INTO 表名称 VALUES (值1, 值2,....)我们也可以指定所要插入数据的列：

　　INSERT INTO table_name (列1, 列2,...) VALUES (值1, 值2,....)插入新的行
例如：INSERT INTO Persons VALUES ('Gates', 'Bill', 'Xuanwumen 10', 'Beijing')
效果如下
LastName FirstName Address City
Carter Thomas Changan Street Beijing
Gates Bill Xuanwumen 10 Beijing

单引号表示是字符串，如果是数字则去掉双引号

参考资料： http://baike.baidu.com/view/8520797.htm

Answer 4

这是，请亮出代码