我是把excel作为一张表来操作的,向里面如果存放字符超过255,就提示错误

解决方案 »

  1.   

    da1.UpdateCommand = New OleDbCommand("UPDATE [sheet1$] SET f2 =?, f4=? where f1=?", conn1)
    我是把excel作为一张表来操作的,向里面如果存放字符超过255,就提示错误
      

  2.   

    这时我的定义: 
     Dim m_sConn1 As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                         "Data Source=" & path & " ;" & _
                         "Extended Properties=""Excel 8.0;HDR=no"""
            
            Dim conn1 As New OleDbConnection(m_sConn1)
            Dim da1 As New OleDbDataAdapter("Select * From [sheet1$]", conn1)
            Dim ds1 As DataSet = New DataSet()
            da1.Fill(ds1, "b")
           
            da1.UpdateCommand = New OleDbCommand("UPDATE [sheet1$] SET f2 =?, f4=? where f1=?", conn1)
            da1.UpdateCommand.Parameters.Add("@f2", OleDbType.VarWChar, 1000).SourceColumn = "f2"
            da1.UpdateCommand.Parameters.Add("@f4", OleDbType.VarWChar, 1000).SourceColumn = "f4"
            da1.UpdateCommand.Parameters.Add("@f1", OleDbType.LongVarChar, 255).SourceColumn = "f1"但是f2不能存放长度超过256的字符串