在不同的服务器上创建对象 ASP
Create Object on different server ASP
我想在 ASP 所在的不同服务器上创建一个临时文件。
这是我的代码:
<%
dim fs,fo,tfile,tname,mappad
set fs=Server.CreateObject("Scripting.FileSystemObject")
response.Write("Path is "&Server.MapPath("\tmp"))
Set fo=fs.GetFolder(Server.MapPath("\tmp"))
tname=fs.GetTempName
mappad=Server.MapPath("tmp\")
set tfile=fo.CreateTextFile(tname,false)
tfile.WriteLine(Server.MapPath("\tmp")&tname)
tfile.close
response.Write("file "&tname&" created succesfully")
set tfile=nothing
set fo=nothing
set fs=nothing
%>
问题是我正在我的根映射中写入,但我需要在网络上的不同映射中写入。这是因为IT部门不希望我们开发人员直接在网站上写。因此,我想写信给 C://inetpub/wwwroot(这是我的本地测试服务器 ofc。)而不是 C://wwdb/images 。在生产环境中,它应该从 intranet.mydomain.com 更改为 *\network\appdata\images*
提前致谢!
使用绝对路径代替 server.mappath - 例如 Set fo=fs.GetFolder("C:\wwdb\images")
。
记得授予您的 IUSR 帐户写入目标文件夹的权限
(根据 Shadow Wizard 的建议发布我的评论作为答案)
我想在 ASP 所在的不同服务器上创建一个临时文件。
这是我的代码:
<%
dim fs,fo,tfile,tname,mappad
set fs=Server.CreateObject("Scripting.FileSystemObject")
response.Write("Path is "&Server.MapPath("\tmp"))
Set fo=fs.GetFolder(Server.MapPath("\tmp"))
tname=fs.GetTempName
mappad=Server.MapPath("tmp\")
set tfile=fo.CreateTextFile(tname,false)
tfile.WriteLine(Server.MapPath("\tmp")&tname)
tfile.close
response.Write("file "&tname&" created succesfully")
set tfile=nothing
set fo=nothing
set fs=nothing
%>
问题是我正在我的根映射中写入,但我需要在网络上的不同映射中写入。这是因为IT部门不希望我们开发人员直接在网站上写。因此,我想写信给 C://inetpub/wwwroot(这是我的本地测试服务器 ofc。)而不是 C://wwdb/images 。在生产环境中,它应该从 intranet.mydomain.com 更改为 *\network\appdata\images*
提前致谢!
使用绝对路径代替 server.mappath - 例如 Set fo=fs.GetFolder("C:\wwdb\images")
。
记得授予您的 IUSR 帐户写入目标文件夹的权限
(根据 Shadow Wizard 的建议发布我的评论作为答案)