Microsoft VBScript 编译器错误错误 '800a0408' 提示无效字符

2008-12-01 10:45:37 1.1k 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

wangjuan1986 墨衍会员 · AI 创作全网分发关注 + 加入社区

Excel数据清洗实战：8个必学函数搞定90%的脏数据问题（附案例）本文通过一个完整的销售数据清洗案例，详细讲解了如何组合使用TRIM、CLEAN、SUBSTITUTE等8个核心Excel函数，构建自动化清洗流水线，高效解决日常办公中90%的脏数据问题，从而将时间留给更有价值的分析工作。阅读详情

<% @LANGUAGE = "VBScript" %>
<%
Name=request("name")
Email=request("Email")
Memo=request("memo")
if name="" or Email="" or memo="" then
response.write"不能为空"
response.end
end if
dim Connstr,conn,SQL
'Connstr="DNS=wj"
set conn=Server.CreateObject("adodb.connection")
conn.ConnectionString="Driver={Microsoft Access Driver (*.mdb)};"&_"DBQ=留言板.mdb;"
conn.open
SQL="insert into 留言版(姓名,E-mail,内容) VALUES('&name&','&email&','&memo&')"
response.write(SQL)
conn.Execute(SQL)
conn.close()
response.redirect("display.asp")

%>

asp连接数据库
请问高手是怎么解决呢？
再下无比感谢啊

...全文

Python实战：基于PyG和Stable-Baselines3复现柔性车间调度算法（附数据集）本文提供了一份基于图神经网络与深度强化学习的柔性车间调度实战指南。通过PyTorch Geometric构建异构图表示车间状态，并利用Stable-Baselines3中的PPO算法训练调度智能体，详细介绍了从环境建模、网络设计到训练评估的完整代码实现，帮助开发者构建可复用的工业级智能调度系统。阅读详情

wangjuan1986

vbScript 4,008 成员 3,512 内容

+ 关注 + 加入社区

切换为时间正序

toury 2008-12-01

打赏
举报



<%

  Name=request("name")

  Email=request("Email")

  Memo=request("memo")

  if len(name)=0 or len(Email)=0 or len(memo)=0 then response.write"不能为空":   response.end

  

  dim Connstr,conn,SQL

  set conn=Server.CreateObject("adodb.connection")

  'conn.ConnectionString="Driver={Microsoft Access Driver (*.mdb)};"&_"DBQ#留言板.mdb;"

  conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("留言板.mdb")

  conn.open

  if conn.state<>1 then

    response.write("数据库连接失败！原因："&err.description)

    set conn=nothing

    response.end

  end if

  '注意：把数据库中原来的E-mail字段改为Email字段！

  SQL="INSERT INTO 留言版(姓名,Email,内容) VALUES('"&name&"','"&email&"','"&memo&"')"

response.write(SQL)'把打印的这句SQL贴出来

  conn.Execute(SQL)

  conn.close():  set conn=nothing

  response.redirect("display.asp")

wangjuan1986 2008-12-01

打赏
举报

insert into 留言版(姓名,E-mail,内容) VALUES('我',' 我',' 我')
Microsoft JET Database Engine '80040e14'

INSERT INTO 语句的语法错误。

\wwwroot\wj\handle.asp, line 18

wangjuan1986 2008-12-01

打赏
举报

大哥改正了
应该是把&后的-去掉】
但新的错误又来了
insert into 留言版(姓名,Email,内容) VALUES('我',' 我',' 我')
Microsoft JET Database Engine '80040e14'

INSERT INTO 语句包含下列未知的字段名： 'Email'。确定键入的名称是正确的，然后重试。

\wwwroot\wj\handle.asp, line 18

wangjuan1986 2008-12-01

打赏
举报

回上面大哥改了，但还是那样啊
<% @LANGUAGE = "VBScript" %>
<%
Name=request("name")
Email=request("Email")
Memo=request("memo")
if name="" or Email="" or memo="" then
response.write"不能为空"
response.end
end if
dim Connstr,conn,SQL
'Connstr="DNS=wj"
set conn=Server.CreateObject("adodb.connection")
'conn.ConnectionString="Driver={Microsoft Access Driver (*.mdb)};"&_"DBQ#留言板.mdb;"
conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;" &_ "Data Source=" & Server.MapPath("留言板.mdb")
conn.open
SQL="insert into 留言版(姓名,Email,内容) VALUES('"&name&"','"&email&"','"&memo&"')"
response.write(SQL)
conn.Execute(SQL)
conn.close()
response.redirect("display.asp")

%>

toury 2008-12-01

打赏
举报

用OLEDB连库，然后把出错的行指出来

wangjuan1986 2008-12-01

打赏
举报

回2楼
试了
但还是不能用

toury 2008-12-01

打赏
举报

你别用ODBC连库了，用OLEDB吧

toury 2008-12-01

打赏
举报

DBQ=留言板.mdb-->DBQ#留言板.mdb
E-mail-->Email

wangjuan1986 2008-12-01

打赏
举报

不好意思啊
刚才敲错了
是这样的
<% @LANGUAGE = "VBScript" %>
<%
Name=request("name")
Email=request("Email")
Memo=request("memo")
if name="" or Email="" or memo="" then
response.write"不能为空"
response.end
end if
dim Connstr,conn,SQL
'Connstr="DNS=wj"
set conn=Server.CreateObject("adodb.connection")
conn.ConnectionString="Driver={Microsoft Access Driver (*.mdb)};"&_"DBQ=留言板.mdb;"
conn.open
SQL="insert into 留言版(姓名,E-mail,内容) VALUES('"&name&"','"&email&"','"&memo&"')"
response.write(SQL)
conn.Execute(SQL)
conn.close()
response.redirect("display.asp")

%>
也提示错误
response.redirect("display.asp")

%>

Microsoft VBScript 编译器错误 错误 '800a0408' 提示无效字符

相关推荐

Microsoft VBScript 编译器错误错误 '800a0408' 提示无效字符