日期：2011-05-02 15:22:00 来源：本站整理

数据库查询中的特别字符的问题[MSSQL防范]

赞助商链接

分享到： QQ空间新浪微博腾讯微博人人网

　　本文“数据库查询中的特别字符的问题[MSSQL防范]”是由七道奇为您精心收集，来源于网络转载，文章版权归文章作者所有，本站不对其观点以及内容做任何评价，请读者自行判断，以下是其具体内容：
在举行数据库的查询时,会常常碰到这样的情形:
比方想在一个用户数据库中查询他的用户名和他的密码,但刚好该用户利用的名字和密码中有特别的字符,比方单引号,"|"号,双引号大概连字符"&".
比方他的名字是1"test,密码是A|&900
这时当你履行以下的查询语句时,必定会报错:
SQL = "SELECT * FROM SecurityLevel WHERE UID="" & UserID & """
SQL = SQL & " AND PWD="" & Password & """
因为你的SQL将会是这样:
SELECT * FROM SecurityLevel WHERE Utest" AND PWD="A|&900"
在SQL中,"|"为分割字段用的,明显会出错了.目前供应下面的几个函数专门用来处理这些头疼的东西:
Function ReplaceStr (TextIn, ByVal SearchStr As String, _
ByVal Replacement As String, _
ByVal CompMode As Integer)

　Dim WorkText As String, Pointer As Integer
　If IsNull(TextIn) Then
　　ReplaceStr = Null
　Else
　　WorkText = TextIn
　　Pointer = InStr(1, WorkText, SearchStr, CompMode)
　　Do While Pointer > 0
　　　WorkText = Left(WorkText, Pointer - 1) & Replacement & _
　　　Mid(WorkText, Pointer + Len(SearchStr))
　　　Pointer = InStr(Pointer + Len(Replacement), WorkText, SearchStr, CompMode)
　　Loop
　　ReplaceStr = WorkText
　End If
End Function

Function SQLFixup(TextIn)
　SQLFixup = ReplaceStr(TextIn, """, """", 0)
End Function
Function JetSQLFixup(TextIn)
　Dim Temp
　Temp = ReplaceStr(TextIn, """, """", 0)
　JetSQLFixup = ReplaceStr(Temp, "|", "" & chr(124) & "", 0)
End Function

Function FindFirstFixup(TextIn)
　Dim Temp
　Temp = ReplaceStr(TextIn, """, "" & chr(39) & "", 0)
　FindFirstFixup = ReplaceStr(Temp, "|", "" & chr(124) & "", 0)
End Function
有了上面几个函数后,当你在履行一个sql前,请先利用:
SQL = "SELECT * FROM SecurityLevel WHERE UID="" & SQLFixup(UserID) & """
SQL = SQL & " AND PWD="" & SQLFixup(Password) & "
　　以上是“数据库查询中的特别字符的问题[MSSQL防范]”的内容，如果你对以上该文章内容感兴趣，你可以看看七道奇为您推荐以下文章：

SQL Server数据库查询优化的常用办法总结

通用SQL数据库查询语句精华利用简介

Java理论与实践:在没有数据库的情形下举行数据库查询

三个办法优化MySQL数据库查询