什么意思呀??
你是怎么录入呀,是通过vb程序吗
还是直接到数据库里面录入呀

解决方案 »

  1.   

    Dim cnn1 As New ADODB.Connection
    Dim rst As New ADODB.Recordset
    Dim cnnstr As String
    cnnstr = " provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.mdb;"
    cnn1.Open cnnstrWith rst
        .CursorType = adOpenKeyset
        .LockType = adLockOptimistic
        .Open "select * from stu", cnnstr
        .AddNew
        .Fields("字段1") = "1"
        .Fields("字段2") = "2"
        .Fields("字段3") = "3"
        .Fields("字段4") = "4"
        .Fields("字段5") = "5"
        .Update
        .UpdateBatch adAffectAllChapters
    End With
    Set Form1.MSHFlexGrid1.DataSource = rst
    rst.Close
    cnn1.Close
    其中cnnstr需要换成连接sql server的字符串
    可以用ADODC控件生成