asp 一个例子

来源:百度知道 编辑:UC知道 时间:2024/05/22 15:39:15
<html>
<head>
<title>新建一个文本文件</title>
</head>
<body>
<%
Dim FileObject
Set FileObject=Server.CreateObject("Scripting.FileSystemObject")
Dim TextFile
Set TextFile=FileObject.CreateTextFile("C:\inetpub\wwwroot\xx\test.txt")
TextFile.WriteLine("你好")
TextFile.WriteLine("欢迎你")
TextFile.Close
Response.Write"已经成功创建文件,请自己打开查看"
%>
</body>
</html>

用来创建一个文本文件。为什么浏览时出现
Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp,行242

Microsoft VBScript 运行时错误 错误 '800a0046'

没有权限

/xx/10-1.asp,行10

哪里的问题?

windows98系统
在DOS命令行状态输入以下命令:
关闭命令:RegSvr32 /u C:\WINDOWS\SYSTEM\scrrun.dll
打开命令:RegSvr32 C:\WINDOWS\SYSTEM\scrrun.dll

win2000系统:
在CMD命令行状态输入以下命令:
关闭命令:RegSvr32 /u C:\WINNT\SYSTEM32\scrrun.dll
打开命令:RegSvr32 C:\WINNT\SYSTEM32\scrrun.dll

win xp系统:
关闭命令:RegSvr32 /u C:\WINDOWS\SYSTEM32\scrrun.dll
打开命令:RegSvr32 C:\WINDOWS\SYSTEM32\scrrun.dll

我的设置步骤:IIS中“属性”--目录安全性--匿名访问和验证控制--编辑---匿名访问--编辑--用户名:Administrator--允许IIS控制密码前打勾 win2003 运行regsvr32 scrrun.dll即可。 如果想关闭FSO组件,请运行 regsvr32 /u scrrun.dll即可。

参考:http://ttrj.net.cn/bbs/dispbbs.asp?boardID=33&ID=639&page=2

不要放在C:\inetpub\wwwroot\目录下

没有开通 FSO权限