Richtextbox 进入 Vb.net 中的 Access

Question

我正在尝试在 vb 2008 中将富文本框内容保存到 Microsoft Access。

我已将 rtf 文件上传到 Richtextbox。现在richtextbox 有表格、段落。

我尝试了richtextbox1.rtf，但是当我保存时出现错误

"查询表达式 ''{\rtf1\fbidis\ansi\ansicpg1252\deff0\deflang1033\deflangfe1033{\fonttbl{\f0\fswiss\fprq2\fcharset0 Calibri;}{\f1\fnil 中的语法错误（缺少运算符） \fcharset0 Calibri;}} \viewkind4\uc1\pard\ltrpar\sa200\sl276\slmult1\f0\fs22 爱沙尼亚\rquote s经济增长c'。"

任何建议。

这是我的代码

    Dim cmd As New OleDbCommand
    Dim sSQL As String = String.Empty

    connection.Open()
    cmd.Connection = connection
    cmd.CommandType = CommandType.Text


    sSQL = "INSERT INTO assessment (a)"
    sSQL = sSQL & " values('" & t1.rtf & "')"
    cmd.CommandText = sSQL
    cmd.ExecuteNonQuery()

    MsgBox("Data has been saved")

Answer 1

您的 rtf 信息可能在某处包含一个单引号，这会弄乱您的字符串，并且数据库引擎无法再判断文本是什么。

你需要使用参数：

sSQL = "INSERT INTO assessment (a) values (@a)"

cmd.Parameters.AddWithValue("@a", t1.rtf)

顺便说一句，总是使用参数来避免 SQL 注入。有人可以在你的文本框中写下';DROP TABLE assessment 之类的东西，你猜怎么着，你的桌子会神秘地消失。参数可以保护您免受这种影响。