作者fumizuki (蒙面加菲狮)
看板Visual_Basic
标题Re: [.NET] 关於资料库新增资料录
时间Mon Jan 1 22:30:34 2007
※ 引述《mermaid94 (一线之隔)》之铭言：
: 我写了一个insert into的语法，想要在资料库的资料表内新增一笔资料，
: 不知道为什麽 他一直说我的INSERT INTO的指令语法错误，
: 我看书上是这样写的，查了很多网路相关资源也看不太出所以然，
: 请各位高手帮我指点迷津好吗？拜托了。
: Dim Connectstr As String = "Provider = Microsoft.Jet.OLEDB.4.0;
: Data Source =D:\DataBase\meal.Mdb;User ID =Admin;"
: '连结资料库
: Dim MyConnection As New OleDbConnection(Connectstr)
: MyConnection.Open()
: （...中间略...我测过了没错）
: Dim InStr As String
: InStr = "INSERT INTO Uorder(ID,user,meal,price,count,total_price)"
: InStr = InStr & " VALUES('" & ONum & "','"
: InStr = InStr & Uname.Text & "','"
: InStr = InStr & Mname & "' ,'"
: InStr = InStr & Mprice & "','"
: InStr = InStr & "1','"
: InStr = InStr & Mprice & "')"
: Dim CMD As New OleDbCommand(InStr, MyConnection)
: Dim count As String = CMD.ExecuteNonQuery()
: MyConnection.Close()
输入的资料有问题？ 你把 InStr 输出看看是否正确
如果 ONum、Uname、.... 那几个资料中包含单引号 就会发生问题了
如果是这种情形的话，↓用这个方式可避免错误
Dim CMD As New OleDbCommand(Replace(InStr, "'", "''"), MyConnection)
--
▃▅▇▆▄ ▆▂▃ `
逝去感情如何能留住，半点痴情遗留殊不易，██▅▇▄▃ ▇▃▂" .
█████████▃i ▁▄▇
更多凄凄惨惨的遭遇…………██▆▃ █▅▆▃ˍ▄*
◢ ▂█▄▇▅▂▌.
我不知道，王～八～蛋～～！ ▂▆███ █▄▃ 。fumizuki。Check。
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 123.194.68.49