%
action=request.querystring("action")
if action = "ADD" And request.form("xingming")<>"" then
xingming=request.form("xingming")
chenghu=request.form("chenghu")
GSDZ=request.form("GSDZ")
email=request.form("email")
tel=request.form("tel")
fax=request.form("fax")
country=request.form("country")
content=request.form("content")
adddate=now()
conn.execute("insert into LY(xingming,chenghu,GSDZ,email,tel,fax,country,content,adddate) values('"&xingming&"','"&chenghu&"','"&GSDZ&"','"&email&"','"&tel&"','"&fax&"','"&country&"','"&content&"','"&adddate&"')")
response.write ""
'response.redirect "lxwm.asp"
end if
Set rs = Server.CreateObject("ADODB.Recordset")
userid=request.querystring("userid")
rs.Open "Select * from LXWM",conn,3,2
%>