恐怖传奇系列:asp中为何db.execute不可用

来源:百度文库 编辑:中科新闻网 时间:2024/04/30 03:10:53
下面是我的一段程序:
<% Option Explicit %>
<!--#include file="001.asp" -->
<%
If request.form("newname")<>"" And request.form("newaddress")<>"" Then
Dim strsql,sqla,sqlb,varname,varaddress,varintro
varname=request.form("newname")
varaddress=request.form("newaddress")
varintro=request.form("newintro")
sqla="insert into list(name,address,"
sqlb="values('" & varname & "','" & varaddress & "'"
If varintro<>"" Then
sqla=sqla & ",intro"
sqlb=sqlb & ",'" & varintro & "'"
End If

strsql=sqla & ")" & sqlb & ")"
db.execute(strsql)
response.redirect "index.asp"
Else
response.write "必须填写网站名称和网站地址"
response.write "<a href='add_form.asp'>重新添加</a>"

End If
%>

你没有定义,所以不能用的
set db=server.CreateObject("adodb.connection")