我搜过一些帖子,讲的都是生成文件后的上传,而且少有讲到上传到数据库的。请教。

解决方案 »

  1.   

    '5个文本框,一个按钮,一个Ado控键
    Option ExplicitPrivate Sub Command1_Click()
    Adodc1.Recordset.Update
    End SubPrivate Sub Form_Load()
    Adodc1.CommandType = adCmdText
    Adodc1.LockType = adLockBatchOptimistic
    'Access连接数据库
    Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="你的文件的路径access.mdb"
    Adodc1.RecordSource = "你Access文件里的表名"
    Text1.DataSource = Adodc1
    Text1.DataField = "你Access里表的字段名"
    Text2.DataSource = Adodc1
    Text2.DataField = "你Access里表的字段名"
    Text3.DataSource = Adodc1
    Text3.DataField = "你Access里表的字段名"
    Text4.DataSource = Adodc1
    Text4.DataField = "你Access里表的字段名"
    Text5.DataSource = Adodc1
    Text5.DataField = "你Access里表的字段名"
    End Sub
      

  2.   

    Private Sub Command1_Click()
    adodc1.recordset.addnew   ''这是我加放的,因为你只有更新,而有添加的过程!!!!!
    Adodc1.Recordset.Update
    End Sub
      

  3.   

    sunmoonrock(日月尧小子) 谢谢
    呵呵一时疏忽
      

  4.   

    你的文件的路径access.mdb
    ????????