Vbscript 非法语法。应为有效的起始名称字符

不确定这里出了什么问题，不太擅长这些东西，所以请提前道歉。我得到了下面的答案，但是当我试着跑步的时候却犯了错误。不确定以前在较旧的服务器上工作并跨服务器迁移数据时，此部件出现了什么问题

<%
rs.Close
if request.form  () <> "" then
varSearch = replace(request.form("T1"),"*","%")
varSearch = replace(varSearch," ","%")
sql = "SELECT * FROM [Cards] WHERE [CardTypeID] = 'C' AND [Name] LIKE '%" & varSearch & "%'
ORDER BY [Name]"
rs.Source = sql
rs.Open
%>

谢谢。

request.form（）-您没有捕获任何内容

<%
rs.Close
if request.form  ("T1") <> "" then
varSearch = replace(request.form("T1"),"*","%")
varSearch = replace(varSearch," ","%")
sql = "SELECT * FROM [Cards] WHERE [CardTypeID] = 'C' AND [Name] LIKE '%" & varSearch & "%'
ORDER BY [Name]"
rs.Source = sql
rs.Open
%>

您收到的错误消息是什么？您是否在代码开头打开了

选项Explicit

？如果你还没有这样做，我建议你这样做。另外，您的SQL实际上是否在代码中突破了这一行？如果是，那可能是您的问题。请显示确切的错误消息。哪条线在提升它？你到底是如何“尝试运行”代码的？嗨，很抱歉，现在看到了这些评论。如果我尝试运行，会出现以下错误。Microsoft JET数据库引擎错误“80004005”磁盘或网络错误。您好，感谢您提供的帮助，但遗憾的是，仍然没有修复此错误：(