VB2005新增数据到DB的问题

问题描述

原本这句应该是这样写的insertCmd="InsertIntoTable(no2,no3,no4,no5)Values(@no2,@no3,@no4,@no5)"但我想用ComboBox1来选择我想用的table,然后输入数据,应该怎么写?是不是该这样改,但是好像不行insertCmd="InsertIntoComboBox1.text(no2,no3,no4,no5)Values(@no2,@no3,@no4,@no5)"DimconnStr,insertCmdAsStringconnStr="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=C:db2.mdb"insertCmd="InsertIntotable(no2,no3,no4,no5)Values(@no2,@no3,@no4,@no5)"DimconnAsOleDbConnection,cmdAsOleDbCommandconn=NewOleDbConnection(connStr)conn.Open()cmd=NewOleDbCommand(insertCmd,conn)cmd.Parameters.Add(NewOleDbParameter("@no2",OleDbType.Integer))cmd.Parameters.Add(NewOleDbParameter("@no3",OleDbType.Integer))cmd.Parameters.Add(NewOleDbParameter("@no4",OleDbType.Integer))cmd.Parameters.Add(NewOleDbParameter("@no5",OleDbType.Integer))cmd.Parameters("@no2").Value=Val(TextBox1.Text)cmd.Parameters("@no3").Value=Val(TextBox2.Text)cmd.Parameters("@no4").Value=Val(TextBox3.Text)cmd.Parameters("@no5").Value=Val(TextBox4.Text)cmd.ExecuteNonQuery()conn.Close()

解决方案

解决方案二：
您要拼成一句语句才行。insertCmd="InsertInto"&ComboBox1.text&"(no2,no3,no4,no5)Values(@no2,@no3,@no4,@no5)"试试吧，可能不一定行，但思路是这样的。
解决方案三：
谢谢楼上的,可是不行,运行后出现INSERTINTO陈述式的语法错误。
解决方案四：
insertCmd="InsertInto"'&ComboBox1.text&'"(no2,no3,no4,no5)Values(@no2,@no3,@no4,@no5)"
解决方案五：
ComboBox1.DataSource=ds.Tables("表名")ComboBox1.DisplayMember="列"ComboBox1.ValueMember="列"ComboBox1.DataBindings.Add("SelectedValue",ds,"表名.列"）
解决方案六：
[vb.netcode]insertCmd="InsertInto"&ComboBox1.text&"(no2,no3,no4,no5)Values(@no2,@no3,@no4,@no5)"[/code]或[vb.netcode]dimaasstring="a"dimbasstring="b"dimcasstring="c"dimdasstring="d"insertCmd="InsertInto"&ComboBox1.text&"(no2,no3,no4,no5)Values('"&a&"','"&b&"','"&c&"','"&d&"')"[/code]
解决方案七：
我也想知道，帮你顶
解决方案八：
再顶啊
解决方案九：
no2,no3,no4,no5字段为字符型时insertCmd="InsertInto"&ComboBox1.text&"(no2,no3,no4,no5)Values('"&TextBox1.Text&"','"&TextBox2.Text&"','"&TextBox3.Text&"','"&TextBox4.Text&"')"