asp語言js寫法與vbscript寫法

串連資料庫
VBS:
<%
dim conn
dim dbpath
dim connstr
Set conn =Server.CreateObject("adodb.connection")
dbpath=Server.MapPath("data.mdb")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&dbpath
conn.open connstr
%>

JS:
<%
var conn;
var dbpath;
var connstr;
conn=Server.CreateObject("adodb.connection");
dbpath=Server.MapPath("data.mdb");
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+dbpath;
conn.open(connstr);
%>

關閉串連
VBS:
<%'關閉釋放記錄集
rs.close
set rs = Nothing
conn.close
set conn = Nothing
%>

JS:
<%//關閉釋放記錄集
rs.close;
rs = null;
conn.close;
conn = null;
%>

輸出
VBS:
Response.write "<script language='javascript'>alert('操作成功,請等待管理員確認\點確定關閉視窗');self.opener.location.reload();window.close();</script>"

JS:
Response.write("<script language='javascript'>alert('操作成功,請等待管理員確認\點確定關閉視窗');self.opener.location.reload();window.close();</script>");

擷取表單對象
VBS:
dim id
id = Request.QueryString("id")

JS:
var id = Request.QueryString("id").item;//重要,js中Request.QueryString是一個對象,要加Item

 

SQL語句日期查詢,這個跟VBS的太不相同,相初我鬱悶了很久,在網上找了很久才想出下面的語句(這個唯寫了JS的,VBS的實在不會寫)
<%
var rs,sql;
rs = Server.CreateObject("adodb.recordset");
sql = "select * from [count] order by dae desc"
rs.open(sql,conn,1,1)
//實現總訪問量
var rst = Server.CreateObject("adodb.recordset");
sqlt="select sum(count) as dt from [count]";
rst.open(sqlt,conn,1,1);
//實現當日訪問量
var rsd = Server.CreateObject("adodb.recordset");
sqld="select sum(count) as dd from [count] where day(dae) = '"+((new Date).getDate())+"' and Month(dae) = '"+((new Date).getMonth()+1)+"' and Year(dae) = '"+((new Date).getYear())+"'";
rsd.open(sqld,conn,1,1);
//實現昨日訪問量
var rsz = Server.CreateObject("adodb.recordset");
sqlz="select sum(count) as zd from [count] where day(dae) = '"+((new Date).getDate()-1)+"' and Month(dae) = '"+((new Date).getMonth()+1)+"' and Year(dae) = '"+((new Date).getYear())+"'";
rsz.open(sqlz,conn,1,1);
//實現當月訪問量
var rsm = Server.CreateObject("adodb.recordset");
sqlm="select sum(count) as dm from [count] where Month(dae) = '"+((new Date).getMonth()+1)+"'";
%>