初学ASP,文件操作的错误
lm09 2001-12-14 03:48:13 <%
set fs=server.createobject("scripting.filesystemobject")
forreading=1
forappending=8
tristateusedefault=-2
tristatetrue=-1
tristatefalse=0
servermap=server.mappath("bbs/log")
temp=servermap&"/"&year(date)&month(date)&"/"
if (not fs.folderexists(temp)) then
*****************
fs.createfolder(temp) 这一行为什么老出错?我想在虚拟的根目录下
创建一个文本文件怎么办?
*****************
end if
dim syslog
dim tempname
tempname=date
syslog=temp&tempname&".log"
li=user&"&"&now&"&"&request.servervariable("remote_addr")&"&"&tempfile&"&"&letter&"&"&title
if fs.fileexists(syslog) then
set ss=fs.opentextfile(syslog,forappending,true)
else
set ss=fs.createtextfile(syslog,forwriting,false)
end if
ss.writeline(li)
ss.close
%>
谢谢各位大虾!