<!--#include file="../dbconn.inc"-->
<%if lb="开发商" then
email=request("email")
tel=request("tel")
name=request("zjgs_name")
sql="insert into zjgs_name(name,email,tel)values('"+zjgs_name+"','"+email+"','"+tel+"')"
else if lb="中介公司" then
email=request("email")
tel=request("tel")
name=request("kfs_name")
sql="insert into kfs_name(name,email,tel)values('"+kfs_name+"','"+email+"','"+tel+"')"
end if
end if
set rs=conn.execute(sql)
response.redirect "goto.htm"
%>
回复人: songzx66() ( ) 信誉:100 2002-3-6 9:32:26 得分:0
多了一个end if
Top
回复人: VFP(为爱付屁) ( ) 信誉:97 2002-3-6 9:34:29 得分:0
不是。我去了一个它提示
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
Top
回复人: VFP(为爱付屁) ( ) 信誉:97 2002-3-6 9:35:21 得分:0
不去提示为
Microsoft OLE DB Provider for SQL Server 错误 '80040e0c'
Command text was not set for the command object.
Top
回复人: karma(无为) ( ) 信誉:100 2002-3-6 9:36:51 得分:0
what error messages did you get?
variable kfs_name is not defined, should be:
else if lb="中介公司" then
email=request("email")
tel=request("tel")
name=request("kfs_name")
sql="insert into kfs_name(name,email,tel) values('"+ name+"','"+email+"','"+tel+"')"
end if
Top
回复人: karma(无为) ( ) 信誉:100 2002-3-6 9:38:43 得分:0
command object? what is conn? is it an ADODB.Connection object? what is in your dbconn.inc?
< %if lb="开发商" then
email=request("email")
tel=request("tel")
zjgs_name=request("zjgs_name")
sql="insert into zjgs_name(name,email,tel)values('"+zjgs_name+"','"+email+"','"+tel+"')"
else if lb="中介公司" then
email=request("email")
tel=request("tel")
zjgs_name=request("kfs_name")
sql="insert into kfs_name(name,email,tel)values('"+kfs_name+"','"+email+"','"+tel+"')"
end if
end if
set rs=conn.execute(sql)
response.redirect "goto.htm"
%>
哦。写错了。变量名字不一致。。。。sorry
< %if lb="开发商" then
email=request("email")
tel=request("tel")
zjgs_name=request("zjgs_name")
sql="insert into zjgs_name(name,email,tel)values('"+zjgs_name+"','"+email+"','"+tel+"')"
else if lb="中介公司" then
email=request("email")
tel=request("tel")
kfs_name=request("kfs_name")
sql="insert into kfs_name(name,email,tel)values('"+kfs_name+"','"+email+"','"+tel+"')"
end if
end if
set rs=conn.execute(sql)
response.redirect "goto.htm"
%>
<%lb=request("lb")
if lb="开发商" then
email=request("email")
tel=request("tel")
zjgs_name=request("dw_name")
sql="insert into zjgs_name(zjgs_name,email,tel)values('"+zjgs_name+"','"+email+"','"+tel+"')"
else if lb="中介公司" then
email=request("email")
tel=request("tel")
kfs_name=request("dw_name")
sql="insert into kfs_name(kfs_name,email,tel)values('"+kfs_name+"','"+email+"','"+tel+"')"
end if
end if
set rs=conn.execute(sql)
response.redirect "goto.htm"
%>