在ASP中使用组件

set cls=Server.CreateObject("MyDLL.MsSql")

cls.ConnStr="driver={sql server} server=www.pc456.cn uid=pc456sss pwd=1 database=www.pc456.cn" 给组件设置数据源信息





添加，修改，删除数据：

cls.execute(sql)

无分页读取数据：

Set Rs=cls.execute(sql)

do while not rs.eof

rs.movenext

loop



有分页列表数据：

　　cls.tblName="Tablename" 表名

　　cls.fldName="Id" 排序关键字段

　　cls.PageIndex=Request("P")*1 当前页码

　　cls.PageSize=20 每页列数

　　cls.OrderType=1 排序方式，0 、1

　　cls.strWhere=StrW 查询条件，不带Where

　　cls.ListUrl="?Y="&Y&"&M="&M&"&D="&D&"&Sn="&Sn&"&P=" 分页URL

Set Rs=cls.Result

do while not rs.eof

rs.movenext

loop



分页数据 cls.page 具体使用看实例







dim Sql_Server,Sql_User,Sql_Pass,Sql_Data

　　 Sql_Server = "192.168.3.172" 数据库服务器地址

　　 Sql_User = "sa"　　　　　　　　 数据库登录名

　　 Sql_Pass = "123456"　　　　　　 数据库密码

　　 Sql_Data = "CRM_Data"　　　　　　　　 数据库名　　-Asp data manipulation components (one million pages) installation process: 1, run " up MyDll.bat" , up for class 2 operation, the SQL Query Analyzer to perform " GetList.sql" , create a stored procedure