asp

N点虚拟主机管理系统 V1.9.5版升级到V1.9.6版方法

1、请先备份 V1.9.4或V1.9.5数据库 及 有用子目录还得备份子目录配置文件(SUBDOMAIN.ini) 2、删除 V1.9.4或V1.9.5版  有用子目录的还得删除ISAPI (网站 >> 右健属性 >> ISAPI筛选器 >> 删除SUBDOMAIN) 3、安装V1.9.6并配置 4、将 V1.9.4或V1.9.5的数据库 履盖 V1.9.6数据库 5、将更新文件放在N点V1.9.6安装路径的 web目录里面 运行 http://你的网址/updata.asp 6、运行完后 请删除 更新文件(updata.asp) 7、有用子目录的用户 请把子目录配置文件放入N点1.9.6安装路径的 ISAPI目录里面 并给 并对ISAPI 文件夹添加 IIS_WPG 权限. 8、有用子目录的用户 添加一下ISAPI (网站 >> 右健属性 >> ISAPI筛选器 >> 添加) 筛选器名称 输入 “subdomain”   可执行文件 选择 N点V...

同一IP重复投票asp源码

<% function getIP() getIP = Request.ServerVariables("HTTP_X_FORWARDED_FOR") If getIP = "" Then getIP = Request.ServerVariables("REMOTE_ADDR") end function if Request.Cookies("mycookie")("userip")<>"" then Response.Write "<script>alert('一个IP地址只能投一次票,谢谢您的参与!'); history.go(-1);</script>" response.End() else Response.Cookies("mycookie")("userip")=getIP() Response....

asp读取远程页面生成静态页的方法

<% Function getHTTPPage(url)  '读取url   dim Http    set Http=server.createobject("MSXML2.XMLHTTP")    Http.open "GET",url,false    Http.send()    if Http.readystate<>4 then     exit function    end if    getHTTPPage=bytesToBSTR(Http.responseBody,"GB2312")    set http=nothing    if err.n...

ASP查询MSSQL并输出内容 示例源码

<% set conn=server.CreateObject("ADODB.Connection") sql="Driver={SQL Server};server=(local);uid=数据库账号;pwd=数据库密码;database=数据库名" conn.open(sql) If Err Then   err.Clear   Set Conn = Nothing   Response.Write "数据库连接出错,请检查连接字串。"   Response.End  End If set rs = conn.execute("select * from AgentsData") do while not rs.eof or bof response.write rs(0)&","&rs(1)&","&rs(2)&",&...

asp中的session使用方法

session 在所有的后台语言里面都是可以直接访问得,例如要创建一个名为user的session: session("user") = "username" 改变一个session session("user") = "username1" 一、Session 对象 可以使用 Session 对象存储特定用户会话所需的信息。这样,当用户在应用程序的 Web 页之间跳转时,存储在 Session 对象中的变量将不会丢失,而是在整个用户会话中一直存在下去。 当用户请求来自应用程序的 Web 页时,如果该用户还没有会话,则 Web 服务器将自动创建一个 Session 对象。当会话过期或被放弃后,服务器将终止该会话。 Session 对象最常见的一个用法就是存储用户的登录信息或者用户设置。例如,如果用户指明不喜欢查看图形,就可以将该信息存储在 Session 对象中。 注意: 会话状态仅在支持 cookie 的浏览器中保留。 语法 Session的集合|属性|方法: 1.集合 Contents 包含已用脚本命令添加到会话中的项目。 StaticObje...

asp中的rs.open于conn.execute的区别

asp中的rs.open于conn.execute的区别     rs.open sql,conn:如果sql是delete,update,insert则会返回一个关闭的记录集,在使用过程中不要来个rs.close在文件最后再写rs.close     中间可以来多个记录集rs1.open sql1,conn,最后一块关闭记录集:rs.close rs1.close     conn.execute(sql) 如果sql是delete,update,insert则会返回一个关闭的记录集,在使用过程中不要来个rs.close在文件最后再写rs.close     中间可以来多个记录集rs1.open sql1,conn,最后一块关闭记录集:rs.close rs1.close.     如果sql是update,insert,delete则应该使用conn.execute(sql)也可以不要括号conn.execute sql     如果sql是select语句则应该使用set rs=conn.execute(sql)括号一定要,不能省略:这是因为vbscript的...

ASP,PHP,ASPX生成静态页大全

随着网站访问量的加大,每次从数据库读取都是以效率作为代价的,很多用ACCESS作数据库的更会深有体会,静态页加在搜索时,也会被优先考虑。互联网上流行的做法是将数据源代码写入数据库再从数据库读取生成静态面,这样无形间就加大了数据库。将现有的ASP页直接生成静态页,将会节省很多。   下面的例子是将、index.asp?id=1/index.asp?id=2/index.asp?id=3/这三个动态页面,分别生成ndex1.htm,index2.htm,index3.htm存在根目录下面: <% dim strUrl,Item_Classid,id,FileName,FilePath,Do_Url,Html_Temp Html_Temp="<UL>" For i=1 To 3 Html_Temp = Html_Temp&"<LI>" Item_Classid = i FileName = "Index"&Item_Classid&".htm" FilePath = Server.MapPath("/")&"...

asp连接sql server 2000数据库的源代码

ASP连接SQL ,这个一般是在程序内用语句实现。建议是这样去做。 给你一个我自己的参考代码。 这个是ASP连接SQL SERVER 2000的。 strConn = "provider=sqloledb.1;server=数据库服务器;uid=用户名;pwd=密码;database=数据库名"     Set conn = Server.CreateObject("ADODB.Connection")     conn.open strConn 希望能对你有所帮助。 这个是ASP连接ACCESS的。 connectionStr = "provider=microsoft.jet.oledb.4.0;data source=" & Server.MapPath("ACCESS数据库路径") conn.Open connectionStr

asp #include

#include #include   命令指示   Web   服务器将文件内容插入到   HTML   页中。所包括的文件可以包含在   HTML   文档中有效的任何内容。必须使用   HTML   注释定界符将指令括起来。 该命令既可用在   ASP   页中,也可用在   HTML   页中。 语法 <!--   #include   PathType   =   FileName   --> 参数 PathType 将   FileName   的路径类型。路径可为以下某种类型: 路径类型   含义   文件   该文件名是带有   #include   命令的文档所在目录的相对路径。被包含文件可位于相同目录或子目录中;但它不能处于带有   #include   命令的页的上层目录中。   虚拟   文件名为   Web   站点上虚拟目录的完整虚拟路径。   FileName 指定要包含的文件名。FileName   必须包含文件名扩展,而且必须将文件名用引号   ( ")   引起来。 注释 包...

asp取得远程网页二进制源代码 和 处理方法

<%     '取得远程网页二进制源代码     Function   getBoy(url)       'on   error   resume   next       Set   objXml   =   Server.CreateObject("Microsoft.XmlHttp")       with   objXml         .open   "get",url,false,"",""         .send         getBoy   =   .responsebody       end   with       getBoy   =   BytesToBstr(GetBoy,"utf-8")       'response.Write(getBoy)       Set   objXml   =   nothing       end   function         '处理二进制流代码     Function   BytesToBstr(strBody,CodeBase)               ...