asp.net 双向探针:即看服务器又看自己 程序名称:asp.net双向探针 File:netinfo.aspx Version:0.1 Build:030503 Written by redwolf Copyright (C) 2000-2003 吹雪(TM)创新工作室 All rights reserved. Homepage:bbsnow.126.com Email:jpwar@163.com 本程序代码完全免费,您可以任意复制,修改和传播。但请保留以上信息谢谢合作。 修改请注明由本程
//---------------------------------------//程序名称:asp.net双向探针//File:netinfo.aspx//Version:0.1 Build:030503//Written by redwolf//Copyright (C) 2000-2003 吹雪(TM)创新工作室 All rights reserved.//Homepage:bbsnow.126.com Email:jpwar@163.com//本程序代码完全免费,您可以任意复制,修改
代码如下:TempSource,TempEnd必须用绝对路径 rootPath=Request.ServerVariables(“APPL_PHYSICAL_PATH”) ‘获取当前程序绝对路径 Function CopyFiles(TempSource,TempEnd) Dim FSO Set FSO = Server.CreateObject(“scr ipting.FileSystemObject”) IF FSO.FileExists(TempEnd) then