untitled.m

VBScript判断字串的代码

var   ConnDB=Server.CreateObject("ADODB.Connection");   
  var   strpath=Server.MapPath("select.mdb");   
  var   strconn="provider=microsoft.jet.oledb.4.0;data   source="+strpath;   
  var   rst=Server.CreateObject("ADODB.recordset");   
  rst.CursorLocation=2;   
  rst.CursorType=3;   
  rst.CacheSize=intpagesize;   
  strsql="Select   *   From   message   Order   By   id   ASC";       
  rst.Open(strsql,strconn,1,3);