booksave.asp

一个很好的ASp.net论坛程序

<!-- #include file="conn.asp" -->
<!-- #include file="function.asp" -->
<%
 if request.form("user")<>"" and request.form("title")<>"" then
 dim user,title,phone,dichi,email,face,content,addtime
 
 user=request.form("user")
 title=request.form("title")
 phone=request.form("phone")
 dichi=request.form("dichi")
 email=request.form("email")
 face=request.form("face")
 layer=0
 content=mychange(request.form("content"))
 addtime=now()

 dim sqla,sqlb,sql
 sqla="insert into book(user,title,phone,dichi,face,layer,addtime"
 sqlb=" values('"& user &"','"& title &"','"& phone &"','"& dichi &"','"& face &"',"& layer &",#"& addtime &"#"

 if email<>"" then
 sqla=sqla &",email"
 sqlb=sqlb &",'"& email &"'"
 end if

 if content<>"" then
 sqla=sqla &",content"
 sqlb=sqlb &",'"& content &"'"
 end if

 sql=sqla & ")" & sqlb & ")"
 db.execute(sql)

 response.redirect "index.asp"
 else
 response.redirect "index.asp"
end if
%>