function getBrowserInfo(sUserAgent){ //取得瀏覽器資訊 var r = /(Netscape|Opera|NetCaptor|MSN |MSIE|MyIE|Mozilla)[s/]{0,1}d{0,}.{0,1}d*/gim; var a = sUserAgent.match(r); return a ?
有時候我們會在頁面上顯示使用者的所在地區,這個原理是:先得到使用者的IP,然後去查詢將IP轉換成一個數值,最後去查這個數值所在的範圍,來得到使用者所在的地方。IP轉換成數值的方法:假設IP是192.168.0.1192*255*255*255+168*255*255+0*255+1結果就是要得到的數值。將ip地址轉換為長整型<% Function CLngIP(ByVal asNewIP) Dim lnResults Dim&nb
方法一:<%dim conn set conn=server.createobject("ADODB.connection") conn.open "PROVIDER=SQLOLEDB;DATA SOURCE=db.janusgroup.cn;UID=web286418;PWD=j2z0h1v2;DATABASE=www_janusgroup_cn" Set conn =
獲得遠端檔案response.write getHTTPPage("http://www.111cn.net")function getHTTPPage(url) on error resume next dim http set http=Server.createobject("Msxml2.XMLHTTP") Http.open "GET",url,false Http.send() if
在IE進行文檔連結時,如果遇到OLE支援的文檔,IE會自動調用相應程式開啟它,有時候這種功能並不是我們所需的,雖然我們可以提醒使用者用滑鼠右鍵-->"目標另存新檔...."命令來下載文檔,但這樣畢竟不太友好,本文描述了利用FSO及Stream方法實現IE直接下載文檔.<%@ language=vbscript codepage=65001%><% 'Filename must be inputif Request("Filename")=""
這是一個簡單的測試分頁的程式,代碼如下:<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"><html><head><meta