一个人的孤单图片:帮帮我调试这个程序(asp+sql server2000 )连接

来源:百度文库 编辑:中科新闻网 时间:2024/05/18 01:39:52
<%
name=Request("name")
email=Request("email")
title=Request("title")
content=Request("content")

if (name="" or title="" or content="") then
response.write"名字,标题和正文不能为空"
response.end
else
newword="<p>发信人:"&name&"电子邮件:<a href=mailto:"&email&">"&email&"
</a><br>标题:"&title&"<br>正文:"&content&"<br>"&Now&"<hr>"

Set file=Server.CreateObject("Scripting.FileSystemObject")
wordfile=Sever.MapPath("word.txt")
Set outfile=file.OpenTextFile(wordfile,1,True)
newword=newword & outfile.ReadAll
outfile.close

Set infile=file.CreateTextFile(wordfile,True)
infile.writeline(newword)
infile.close

response.redirect"showword.asp"
end if
%>

这和 SQL SERVER 2000 有什么关系?

晕,都是fso,和数据库没关系阿