刚刚接触FSO.这些代码出现了问题如下
Microsoft VBScript 编译器错误 错误 '800a0401'
语句未结束
/admin_root/admin_info.asp,行67
ForReading = 1, ForWriting = 2, ForAppending = 3
--------------^
版主帮一下啊
代码如下
id=request.form("id")
title=request.form("info_title")
net=request.form("info_net")
logo=request.form("info_logo")
cert=request.form("info_cert")
copyright=request.form("info_copyright")
email=request.form("info_email")
wwwmail=request.form("info_wwwmail")
add=request.form("info_add")
tel=request.form("info_tel")
fax=request.form("info_fax")
config="<% info_title="&title&" info_net="&net&" info_logo="&logo&" info_cert="&cert&" info_copyright="©right&" info_email="&email&" info_wwwmail="&wwwmail&" info_add="&add&" info_tel="&tel&" info_fax="&fax&""
Set fso = Server.CreateObject("Scripting.FileSystemObject")
path = "d: config.ini"
ForReading = 1, ForWriting = 2, ForAppending = 3
set file = fso.opentextfile(path, ForAppending, TRUE)
file.write(config)
file.close
set file = nothing
set fso = nothing