在Vb中将Richtextbox转换为Access。网

Question

我正在尝试将richtextbox内容保存到vb 2008中的Microsoft Access。

我已经上传了一个rtf文件到rich text box。现在rich text box有表格、段落。

我试过richtextbox1。rtf，但当我保存时，我得到的错误为

"查询表达式中的语法错误（缺少运算符）"{\rtf1\fBidis\ansi\ansicpg1252\deff0\德洛朗1033\德洛朗费1033{\fonttbl{\f0\fswiss\fprq2\fcharset0 Calibri；}{\f1\fnil\fcharset0 Calibri；}}\viewkind4\uc1\pard\ltrpar\sa200\sl276\slmult1\f0\fs22爱沙尼亚\rquis经济增长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注入。有人可以写一些你喜欢的东西；将表格评估放到文本框中，猜猜看，你的表格会神秘地消失。参数将保护您免受此影响。