Board logo

标题: [问题求助] [已解决]access数据库SQL语言里面的特殊符号怎么处理 [打印本页]

作者: czjt1234    时间: 2016-4-20 06:52     标题: [已解决]access数据库SQL语言里面的特殊符号怎么处理

本帖最后由 czjt1234 于 2016-4-23 20:06 编辑
  1. 'win7x64,强制在32位环境运行脚本
  2. Set oWS  = CreateObject("WScript.Shell")
  3. Set oFSO = CreateObject("Scripting.FileSystemObject")
  4. s = oWS.ExpandEnvironmentStrings("%windir%\SysWOW64\WScript.exe")
  5. If oFSO.FileExists(s) = True And LCase(WScript.FullName) <> LCase(s) Then
  6.     oWS.Run s & " """ & WScript.ScriptFullName & """"
  7.     WScript.Quit()
  8. End If
  9. '创建新数据库文件
  10. If oFSO.FileExists("c:\new.mdb") Then oFSO.DeleteFile "c:\new.mdb"
  11. Set oCatalog = CreateObject("Adox.Catalog")
  12. oCatalog.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\new.mdb;Jet OLEDB:Database Password=test;"
  13. '连接数据库
  14. Set oConnection = CreateObject("Adodb.Connection")
  15. oConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\new.mdb;Jet OLEDB:Database Password=test;"
  16. '创建表
  17. oConnection.Execute "Create Table 成绩(学号 SmallInt, 成绩 Real)"
  18. WScript.Sleep 500
  19. 'oConnection.Execute "Drop Table 成绩"  '这个不报错
  20. '修改表名
  21. Set oCatalog = CreateObject("Adox.Catalog")
  22. Set oCatalog.ActiveConnection = oConnection
  23. oCatalog.Tables.Item("成绩").Name = "8(9)班成绩"
  24. '删除表
  25. oConnection.Execute "Drop Table 8(9)班成绩"
复制代码
最后一行报错,SQL里面的()是特殊符号

试了
"Drop Table 8\(9\)班成绩"
"Drop Table 8((9))班成绩"
"Drop Table 8[(]9[)]班成绩"
"Drop Table 8" & Chr(40) & "9" & Chr(41) & "班成绩"
都不行

access数据库SQL语言里面的特殊符号怎么处理?
作者: czjt1234    时间: 2016-4-23 20:07

"Drop Table [8(9)班成绩]"

ok




欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2