易截截图软件、单文件、免安装、纯绿色、仅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 excel导出/导入Access数据库(代码+实例下载)

Excel导出函数
<%
Sub   ExportToExcel    
Response.ContentType   =   "application/vnd.ms-Excel"  
Response.AddHeader   "Content-Disposition",   "attachment;Filename=Results.xls"  
Response.Write  ......

asp 导出excel数据 fso 单元格格式

<!--#include file="../conn.asp"-->
<%
dim s,sql,filename,fs,myfile,x
Set fs = server.CreateObject("scripting.filesystemobject")
'--假设你想让生成的EXCEL文件做如下的存放
filename = Server.MapPath("users.xls")
'--如果原来的EXCEL文件存在的话删除它
if fs.FileExists(filename) then ......

ASP 化境上传组件上传不成功 提示不允许操作

今天一个ASP项目发现 化境上传组件上传BMP图片不成功,提示不允许操作,经查因为图片太大,以下解决方法:
在服务里关闭iis   admin   service服务   
    
找到windows\system32\inesrv\下的metabase.xml,   
打开,找到ASPMaxRequestEntityAllowed &n ......

ASP错误提示大全

MicrosoftVBScript语法错误(0×800A03E9)–>内存不足MicrosoftVBScript语法错误(0×800A03EA)–>语法错误
 
MicrosoftVBScript语法错误(0×800A03EB)–>缺少?’:’
 
MicrosoftVBScript语法错误(0×800A03ED)–>缺少?’(’
 
Micros ......

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号