如何把多行文本框的内容插入到数据库,我试过用普通的插入语句,只能插入一行,
比如插入一个家庭基本状况数据
父亲:某某某    干某某某工作
母亲:某某某    干某某某工作
......
......
但多行数据只能插入头一行
用的数据库是ACCESS

解决方案 »

  1.   

    我刚才用ACCESS创建了名为DB1.MDB的数据库,库里只有一个表temp,表里只有一个字段name,name为文本型,长度为默认的50,执行了下面语句:
    Private Sub main()
        Dim DB
        Dim RS
        
        Set DB = CreateObject("ADODB.Connection")    '打开数据库
        DB.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\db1.mdb;"
        '插入带换行的文本
        DB.Execute "INSERT INTO temp VALUES('我爱你" & vbCrLf & "中国')"
        '查询字段并输出
        Set RS = DB.Execute("SELECT * FROM temp")
        Debug.Print RS.Fields(0).Value '查询的结果是带有换行的。
        RS.Close
        Set RS = Nothing
        
        DB.Close
        Set DB = Nothing
    End Sub
    结果正常!
      

  2.   

    如果要是动态文本框如何产生& vbCrLf &的效果 比如一个文本框DB.Execute "INSERT INTO temp VALUES('"&text1.text&"')" 
      

  3.   

    如果是text控件的话要将multiLine设置成True