[已解决]access数据库SQL语言里面的特殊符号怎么处理

czjt1234

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. '创建新数据库文件
    
11. If oFSO.FileExists("c:\new.mdb") Then oFSO.DeleteFile "c:\new.mdb"
    
12. Set oCatalog = CreateObject("Adox.Catalog")
    
13. oCatalog.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\new.mdb;Jet OLEDB:Database Password=test;"
    
14. 
    
15. '连接数据库
    
16. Set oConnection = CreateObject("Adodb.Connection")
    
17. oConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\new.mdb;Jet OLEDB:Database Password=test;"
    
18. 
    
19. '创建表
    
20. oConnection.Execute "Create Table 成绩(学号 SmallInt, 成绩 Real)"
    
21. WScript.Sleep 500
    
22. 
    
23. 'oConnection.Execute "Drop Table 成绩"  '这个不报错
    
24. 
    
25. '修改表名
    
26. Set oCatalog = CreateObject("Adox.Catalog")
    
27. Set oCatalog.ActiveConnection = oConnection
    
28. oCatalog.Tables.Item("成绩").Name = "8(9)班成绩"
    
29. 
    
30. '删除表
    
31. 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

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

ok