易截截图软件、单文件、免安装、纯绿色、仅160KB

asp常见的连接字符串

Access 连接字符串
strConnect = “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\MyDatabase.mdb;”
Access 2007 连接字符串
strConnect = “Provider=Microsoft.ACE.OLEDB.12.0;Mode=Share Exclusive;Data Source=C:\MyDatabase.accdb;”
MSSQL Server 连接字符串
strConnect = “Provider=SQLOLEDB;Data Source=ServerName\InstanceName;Initial Catalog=DatabaseName;User ID=UserName;Password=password;”
Excel 连接字符串
strConnect = “Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties=”"Excel 8.0;HDR=YES”";Data Source=C:\MyWorkbook.xls;”
其中HDR默认值为YES表示第一行为字段名, 否则第一行将作为内容
Excel 2007 连接字符串
strConnect = “Provider=Microsoft.ACE.OLEDB.12.0;Extended Properties=Excel 12.0;Data Source=C:\MyWorkbook.xlsx;”
文本文件(文本文件也能当数据库使用)
strConnect = “Provider=Microsoft.ACE.OLEDB.12.0;Extended Properties=Text;Data Source=C:\Files\;”
呃, 参数Data Source为包含文件的目录名, 而不是文件名称. 如果文本文件的第一行不包含字段名称, 则必须在参数Extended Properties中参加HDR=No(同Excel), 以避免丢失第一行的数据.
使用连接字符串
复制代码 代码如下:
Dim conn
Sub DBOpen()
Dim db : db=Server.MapPath(”zzz.mdb”)
Set conn=Server.CreateObject(”Adodb.Connection”)
On Error Resume Next
conn.Open “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=” & db
If Err.Number<>0 then
Err.Clear
Response.Write(”<h1>The Database link is ERROR</h1>”)
Response.End()
End If
On Error GoTo 0
End Sub
Call DBOpen()
… …
conn.CLose() : Set conn=Nothing
详细出处参考:http://www.jb51.net/article/20869.htm


相关文档:

asp:treeview

   public static void SetTreeNode(System.Web.UI.WebControls.TreeView treeRolePopedom, string rolecode,out string errMsg)
        {
            int k = 0;
       & ......

Windows XP home版安装asp运行环境

    本人的本本上是home版的XP,无法正常安装IIS,但是网上查到几篇博文,说是能安装IIS,于是按照上面的描述亲自试了一下。
    其大致方法如下:
     1、首先打开C盘Windows目录中inf目录下的sysoc.inf文件(可以在运行中直接输入“c:\windows\inf\sysoc.inf&rdqu ......

风渡科技ASP网上购物系统

软件名称:风渡科技ASP网上购物系统  v0912-26
 
软件大小:7069k
 
运行环境:ASP/Access
 
软件类别:电子商务
 
软件授权:免费
 
开发商家: 风渡科技
 
官方网站:http://www.chinammc.com
 
演示地址:http://demo01.chinammc.com
 
下载地址: http://w ......

asp数组随机排序

这段代码的功能是:将一个数组打乱顺序,显示出来,让每一次显示的顺序都不一样。
<%
Dim tt
tt=Split("1,2,3,4,5,6",",")
'随机排序  
leng=UBound(tt)
randomize  
for ii=0 to leng-1  
 b=int(rnd()*leng)  
 temp=tt(b)  
 tt(b ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号