28,406
社区成员
发帖
与我相关
我的任务
分享请高手赐教啊，给28分好吗，应该是很简单的啊！
服务器对象 错误 'ASP 0177 : 800401f3'
Server.CreateObject 失败
/lianxi/test01/01.asp, 行2
800401f3
这个问题该如何解决啊
Server.CreateObject 失败
/lianxi/test01/01.asp, 行2
800401f3
这个问题该如何解决啊
...全文
请发表友善的回复…
发表回复
julyclyde 2001-12-06
- 打赏
- 举报
创建了你把系统文件搞坏怎么办！所以不可以随便创建
shyboy139 2001-12-05
- 打赏
- 举报
fso为什么不能随便创建呢，它是什么意思呢？请高手赐教啊，现在也不能给分真麻烦啊？
crodling 2001-12-02
- 打赏
- 举报
贴出原码看一下吧
CTBOK 2001-12-02
- 打赏
- 举报
没有代码，看个屁啊？
wxt 2001-12-02
- 打赏
- 举报
file_Path = Server.MapPath(FileName)改成
file_Path = Server.MapPath("/"&FileName)
file_Path = Server.MapPath("/"&FileName)
julyclyde 2001-12-02
- 打赏
- 举报
fso不能随便创建
julyclyde 2001-12-02
- 打赏
- 举报
fso不能随便创建，有危险
shyboy139 2001-12-02
- 打赏
- 举报
代码就是：
<%
adindex = Request("index")
FileName = "Record" & Month(Date()) & Day(Date()) & ".txt"
set fs = Server.CreateObject("Scripting.FileSystemObject")
file_Path = Server.MapPath(FileName)
Set RecordFile = fs.OpenTextFile(file_Path, 8 ,True, 0)
RecordFile.WriteLine adindex
if adindex = 1 then Response.Redirect "ff.htm"
if adindex = 2 then Response.Redirect "dd.htm"
%>
<%
adindex = Request("index")
FileName = "Record" & Month(Date()) & Day(Date()) & ".txt"
set fs = Server.CreateObject("Scripting.FileSystemObject")
file_Path = Server.MapPath(FileName)
Set RecordFile = fs.OpenTextFile(file_Path, 8 ,True, 0)
RecordFile.WriteLine adindex
if adindex = 1 then Response.Redirect "ff.htm"
if adindex = 2 then Response.Redirect "dd.htm"
%>
