- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我在调试时遇到错误,请有人帮忙...下面是代码:
Private Sub UpdateToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles UpdateToolStripMenuItem.Click
If MsgBox("Save Changes?", MsgBoxStyle.Question + MsgBoxStyle.YesNo, "WARNING") = MsgBoxResult.Yes Then
Dim oleDC As New OleDbCommand
With oleDC
.Connection = conn
.CommandText = "UPDATE tblPatientsRecord SET Names='" & txtNames.Text & _
"',Licensenumber='" & txtLicensenumber.Text & _
"',Address='" & txtAddress.Text & _
"',Fullname='" & txtFullname.Text & _
"',Birthday='" & txtBase.Text &
"',Age='" & txtAge.Text & _
"',Country='" & cmbCountry.Text & "' WHERE PatientID='" & txtPatientID.Text & "'"
.ExecuteNonQuery()
MsgBox("Record Updated!", MsgBoxStyle.Information + MsgBoxStyle.OkOnly, "SUCCESS")
Disable()
Clear()
SaveToolStripMenuItem.Enabled = False
NewToolStripMenuItem.Enabled = True
LoadPatientsRecord()
getLastPatientID()
End With
End If
End Sub
请帮忙
最佳答案
您应该使用 SQL 参数。这些不仅会简化您的代码,而且会极不可能出现某些关于语法和数据类型的错误,并防止 SQL 注入(inject)攻击:
Dim sql = <sql>
UPDATE tblPatientsRecord SET [Names] = @p1,
Licensenumber = @p2,
Address = @p3,
Fullname = @p4,
Birthday = @p5,
[Age] = @p6,
Country = @p7
WHERE PatientID = @p8
</sql>.Value
Using conn = New OleDbConnection(myConnStr),
cmd As New OleDbCommand(sql, conn)
conn.Open()
cmd.Parameters.Add("@p1", OleDbType.VarChar).Value = txtNames.Text
cmd.Parameters.Add("@p2", OleDbType.VarChar).Value = txtLicensenumber.Text
' ...etc
cmd.Parameters.Add("@p6", OleDbType.Integer).Value = intVar
cmd.Parameters.Add("@p7", OleDbType.VarChar).Value = strVar
'the last one is the WHERE
cmd.Parameters.Add("@p8", OleDbType.VarChar).Value = Convert.ToInt32(lblPatientID.Text)
cmd.ExecuteNonQuery()
'... etc
End Using
还有一些其他常见问题需要注意。
DBConnection 对象旨在创建、使用和处置,而不是反复使用同一个对象。但是,您可以使用全局连接字符串,这样就不会到处都有相同的连接字符串。
许多DBObject 应该被丢弃。 Using
block 将关闭并处置连接和命令对象。一般来说,如果某些东西有 Dispose
方法,请将它们包装在 Using
block 中。上面展示了如何将 2 个对象(OleDbConnection
和 OleDbCommand
)“堆叠”到一个 Using
语句中,从而减少缩进。
使用Add
方法而不是AddWithValue
。这允许您指定每个参数的数据类型。如果没有它,数据库提供程序必须猜测哪个可能导致数据类型不匹配
,甚至在某些情况下损坏数据库。
WHERE
子句只是另一个参数。通常人们会在 SQL 的第一部分使用参数,但不必要地连接 WHERE 子句。
上面还使用 XML 文字来构造 SQL。这对于又长又复杂的 SQL 来说非常方便,因为您可以根据需要对其进行格式化和缩进。您也可以只使用多行来使其可读:
Dim sql = "更新 tblPatientsRecord SET [名称] = @p1,"_
&“许可证号 = @p2,” _
&“地址=@p3,”
如果您使用SQL reserved words或者表名或列名中存在空格,您必须使用 [方括号]
对名称进行转义,如下所示。最好不要在名称中使用任何一个。 User
、Password
Names
和 Values
是用作列或表名称的常见单词,会导致 SQL 语法错误。
刻度不是通用的 SQL 字段分隔符,它们实际上指示传递的值是字符串/文本:& "Age ='"& txtAge.Text & “'”
。如果数据库设置为将年龄
存储为数字,则您的SQL会将其作为文本/字符串传递,这可能会导致数据类型不匹配
。如果是日期字段,PatientID
和 Birthday
也是如此。
连接 SQL 语句字符串的一个常见问题是结果中的刻度 ('
) 过多或过少。 SQL 参数不会发生这种情况。
SQL 参数的主要目的是防止名称为“O'Brian”或“O'Reilly”或 "Bobby';DROP TABLE tblPatientsRecord" 时出现错误。
这些原则适用于其他数据库提供商,例如 MySql
、SQLite
和 SQLServer
。然而,诸如确切的转义字符之类的细节会有所不同。
请注意,Access/OleDB 实际上并不使用这样的命名参数(@FirstName
甚至 @p2
),因此通常会请参阅“?”形式的参数。这意味着您必须按照这些列在 SQL 中显示的顺序添加参数值 (Add
/AddWithValue
)。
更多信息请参见:
关于vb.net - OleDbException 未处理......UPDATE 语句中的语法错误,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/29186317/
创建一个“海盗对话”,可以选择左手或右手。我希望它对“左”和“右”的不同拼写做出积极的回答(正如您将在代码中看到的那样),但是,当我为所有非“右”或“左”的输入添加最终的“else”代码时,它给了我一
With 语句 对一个对象执行一系列的语句。 With object statements End With 参数 object 必需的部分
While...Wend 语句 当指定的条件为 True 时,执行一系列的语句。 While condition  ; Version [stat
所以我正在处理的代码有一个小问题。 while True: r = input("Line: ") n = r.split() if r == " ":
我有一个对象数组: var contacts = [ { "firstName": "Akira", "lastName": "Laine", "number"
int main() { int f=fun(); ... } int fun() { return 1; return 2; } 在上面的程序中,当从main函数中调用一个
我的项目中有很多 if 语句、嵌套 if 语句和 if-else 语句,我正在考虑将它们更改为 switch 语句。其中一些将具有嵌套的 switch 语句。我知道就编译而言,switch 语句通常更
Rem 语句 包含程序中的解释性注释。 Rem comment 或 ' comment comment 参数是需要包含的注释文本。在 Rem 关键字和 comment 之间应有一个空格。
ReDim 语句 在过程级中声明动态数组变量并分配或重新分配存储空间。 ReDim [Preserve] varname(subscripts) [, varname(subscripts)]
Randomize 语句 初始化随机数生成器。 Randomize [number] number 参数可以是任何有效的数值表达式。 说明 Randomize 使用 number 参数初始
Public 语句 定义公有变量并分配存储空间。在 Class 块中定义私有变量。 Public varname[([subscripts])][, varname[([subscripts])
Sub 语句 声明 Sub 过程的名称、参数以及构成其主体的代码。 [Public [Default]| Private] Sub name [( arglist )]
Set 语句 将对象引用赋给一个variable或property,或者将对象引用与事件关联。 Set objectvar = {objectexpression | New classname
我有这个代码块,有时第一个 if 语句先运行,有时第二个 if 语句先运行。我不确定为什么会这样,因为我认为 javascript 是同步的。 for (let i = 0; i < dataObje
这是一个 javascript 代码,我想把它写成这样:如果此人回答是,则回复“那很酷”,如果此人回答否,则回复“我会让你开心”,如果此人回答的问题包含"is"或“否”,请说“仅键入”是或否,没有任何
这是我的任务,我尝试仅使用简短的 if 语句来完成此任务,我得到的唯一错误是使用“(0.5<=ratio<2 )”,除此之外,构造正确吗? Scanner scn = new Scanner(
有没有办法在 select 语句中使用 if 语句? 我不能在这个中使用 Case 语句。实际上我正在使用 iReport 并且我有一个参数。我想要做的是,如果用户没有输入某个参数,它将选择所有实例。
这个问题在这里已经有了答案: 关闭 11 年前。 Possible Duplicate: If vs. Switch Speed 我将以 C++ 为例,但我要问的问题不是针对特定语言的。我的意思是一
Property Set 语句 在 Class 块中,声明名称、参数和代码,这些构成了将引用设置到对象的 Property 过程的主体。 [Public | Private] Pro
Property Let 语句 在 Class 块中,声明名称、参数和代码等,它们构成了赋值(设置)的 Property 过程的主体。 [Public | Private] Prop
我是一名优秀的程序员,十分优秀!