参照其他文件修改的，网站终于恢复正常，不懂程序，所以不知道原理，大致是加个判断吧。
原来的代码：
| For p=1 to mpage step 1 dim fso,ktemplate,kyp set fso=createobject("scripting.filesystemobject") set ktemplate=fso.opentextfile(server.mappath("../muban/create_html.asp")) kyp=ktemplate.readall ktemplate.close set ktemplate=nothing fso.CreateFolder(server.mappath("..\diqu"&address)) if s_id=0 then ... |
修改后的代码：
| For p=1 to mpage step 1 dim fso,ktemplate,kyp set fso=createobject("scripting.filesystemobject") set ktemplate=fso.opentextfile(server.mappath("../muban/create_html.asp")) kyp=ktemplate.readall ktemplate.close set ktemplate=nothing if fso.FolderExists(server.mappath("..\diqu"&address)) then ' else fso.CreateFolder(server.mappath("..\diqu"&address)) end if if s_id=0 then ... |
版权与免责声明
1、本站所发布的文章仅供技术交流参考，本站不主张将其做为决策的依据，浏览者可自愿选择采信与否，本站不对因采信这些信息所产生的任何问题负责。
2、本站部分文章来源于网络，其版权为原权利人所有。由于来源之故，有的文章未能获得作者姓名，署“未知”或“佚名”。对于这些文章，有知悉作者姓名的请告知本站，以便及时署名。如果作者要求删除，我们将予以删除。除此之外本站不再承担其它责任。
3、本站部分文章来源于本站原创，本站拥有所有权利。
4、如对本站发布的信息有异议，请联系我们，经本站确认后，将在三个工作日内做出修改或删除处理。
请参阅权责声明！