大虾来帮帮忙，字符转换的问题：）

[rainhill]

各位老鸟，小弟有一个问题
在写asp的时候遇到一个问题
就是把'这个字符转化成类似：Replace(str,chr(34),""")中 " 这样的字符。怎么搞？
'对应的是什么呢？

function CheckBadWords(str)
CheckBadWords = Replace(str,chr(34),""")
end function

我想在以上函数中转化了双引号和单引号：）
谢谢了~~~

[tuoshi]

单引号好象没有吧，如果你是限止sql语句出错转换的话可以这样：

Replace(str, "'", "''")

[超级大笨狼]

Visual Basic Scripting Edition

字符集 (0 - 127)
请参阅
字符集 (128 - 255)
下表列出了字符集中的 0 - 127。

代码 字符 代码 字符 代码 字符 代码 字符
0 32 [空格] 64 @ 96 `
1 33 ! 65 A 97 a
2 34 " 66 B 98 b
3 35 # 67 C 99 c
4 36 $ 68 D 100 d
5 37 % 69 E 101 e
6 38 & 70 F 102 f
7 39 ' 71 G 103 g
8 ** 40 ( 72 H 104 h
9 ** 41 ) 73 I 105 i
10 ** 42 * 74 J 106 j
11 43 + 75 K 107 k
12 44 , 76 L 108 l
13 ** 45 - 77 M 109 m
14 46 . 78 N 110 n
15  47 / 79 O 111 o
16  48 0 80 P 112 p
17  49 1 81 Q 113 q
18  50 2 82 R 114 r
19 51 3 83 S 115 s
20 52 4 84 T 116 t
21 53 5 85 U 117 u
22  54 6 86 V 118 v
23  55 7 87 W 119 w
24  56 8 88 X 120 x
25  57 9 89 Y 121 y
26  58 : 90 Z 122 z
27 59 ; 91 [ 123 {
28  60 < 92 \ 124 |
29  61 = 93 ] 125 }
30 - 62 > 94 ^ 126 ~
31 63 ? 95 _ 127 

** 数值 8、9、10 和 13 可以分别转换为退格符、制表符、换行符和回车符。这些字符都没有图形表示，但是对于不同的应用程序，这些字符可能会影响文本的显示效果。

 表示在当前平台上不支持的字符。

请参阅
字符集 (128 - 255)



--------------------------------------------------------------------------------

© 2001 Microsoft Corporation. 保留所有权利。

[超级大笨狼]

function CheckBadWords(str)
CheckBadWords = Replace(str,chr(asc(')),""")

end function

[超级大笨狼]

单引号不是"""

[tuoshi]

呵，查到了：

Replace(str, "'", "'")

[rainhill]

太感谢楼上的大虾了，！！！！！