<%
  dim donn,strcnn
  Set c.CreateObject("ADODB.Connection")
  strcnn="Provider=sqloled;User id=sa;Password=;Initial Catalog=govlog;
  Data Source=(local)"
  cnn.open strcnn
%>






网上资料
  Dim   cn,rs  
  set   cn=Server.CreateObjeCT("ADODB.CONNECTION")  
  cn.open   "provider=sqloledb;server=local;database=central;uid=yang;pwd=123;"  
  set   rs=Server.CreateObject("ADODB.RECORDSET")  
  sqlstr="select   *     from       Tb_Operator"  
  rs.open   sqlstr,cn,1,3

本文出自 “赵宏臣主页” 博客，请务必保留此出处http://zhcsmx22.blog.51cto.com/287943/54452

本文出自 51CTO.COM技术博客