例6－16.asp

web课件并附有习题练习还有实例详细的讲解了WEB的各种开发过程是学习 的好资料

<!-- #INCLUDE file="ADOVBS.inc"-->
<%
Set Conn=Server.CreateObject("ADODB.Connection") 
'创建一个命令对象
Set MyComm=Server.CreateObject("ADODB.Command")
Conn.Open "MyData" 
Set MyComm.ActiveConnection=Conn
MyComm.CommandText= "SELECT * FROM sales" 
MyComm.CommandType=adCMDText
Set RS=MyComm.Execute()
Conn.Close
%>