作者yukimir (小環)
看板Visual_Basic
標題[.NET] 更新資料傳回資料庫的問題
時間Sun Jun 8 16:27:44 2008
這是我更新那部份的程式碼
sub upd(sender as object,e as datagridcommandeventargs)
dim con as oledbconnection
dim com as oledbcommand
Dim sqlstr As String
dim provider="provider=microsoft.jet.oledb.4.0"
Dim database = "data source=" & Server.MapPath("db2.mdb")
con = new oledbconnection( provider & ";" & database )
con.open()
sqlstr = "update guestbook set 姓名=@姓名,標題=@標題,留言=@留言,時間=@
時間, where 標題=@key"
com=new oledbcommand(sqlstr, con)
com.parameters.add(new oledbparameter("@姓名",oledbtype.char,10))
com.Parameters.Add(New OleDbParameter("@標題", OleDbType.Char, 10))
com.Parameters.Add(New OleDbParameter("@留言", OleDbType.Char, 10))
com.Parameters.Add(New OleDbParameter("@時間", OleDbType.DBDate))
com.parameters.add(new oledbparameter("@key",oledbtype.char))
Dim tx(4) As TextBox
tx(1)=e.item.cells(1).controls(0)
tx(2)=e.item.cells(2).controls(0)
tx(3)=e.item.cells(3).controls(0)
tx(4)=e.item.cells(4).controls(0)
com.parameters("@key").value=dg.datakeys(e.item.itemindex)
com.parameters("@姓名").value=tx(1).text
com.Parameters("@標題").Value = tx(2).Text
com.Parameters("@留言").Value = tx(3).Text
com.Parameters("@時間").Value = tx(4).Text
com.ExecuteNonQuery()
con.close()
dg.edititemindex = -1
data()
end sub
-----------------------------------------------------------------
書上說com.ExecuteNonQuery() 是執行command物件的executenonauery()方法
將資料新增到資料庫
可是我每次在瀏覽器中檢視 都會一直顯示com.ExecuteNonQuery()這行是錯的
可以請問要怎麼改嗎?
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.115.80.89
1F：推 mathlinka:@時間後面好像多了個逗點... 06/08 17:22
2F：→ yukimir:真的耶！ 我好眼殘沒發現= = 謝謝你的幫忙~ 06/08 17:27