VB。NET的代码在fill那句出问题
Dim mycnn As New Data.OleDb.OleDbConnection()
Dim mycommand As New Data.OleDb.OleDbCommand()
Dim strcnn As String = "insert into message values('"
Dim ds As New Data.DataSet()
Dim dp As New Data.OleDb.OleDbDataAdapter()
mycnn.ConnectionString = "Provider=microsoft.jet.oledb.4.0;" & "Data Source=D:\lyb\App_Data\message.mdb"
strcnn = strcnn & 姓名.Text & "','" & 标题.Text & "','" & 内容.Text & "')"
mycnn.Open()
mycommand.CommandText = strcnn
mycommand.Connection = mycnn
dp.SelectCommand = mycommand
dp.Fill(ds, "message")
mycnn.Close()
红色那句出错,原因是:查询值的数目与目标字段中的数目不同。