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
    
     
	
	
    
    
	相关文档:
        
    
    <%
'日期函数包DataPackage
%>
<script language="javascript">
function IsDateString(Str)
<!--
{
// 校验是否YYYY-MM-DD格式的日期型数据,返回值为True成功,否则返回False
// 如果传递的是空字符串则返回False
// 定义分隔符
var sSplit="-"
var iYearPos=Str.indexOf(sSplit);
if (iYearP ......
	
    
        
    
    
最近做一个用asp做的网站后台的数据导出功能时,google,baidu了很多,但是多数都是转载,代码大概都一样,但是就是报错,最后有人说通过设置MIME类型和建立模板,最后整理,测试问题终于解决.关键的地方有以下几点:
1):MIME类型要设置正确,如要把DB中表(或表中指定字段)的数据导出成exel格式时,头部的MEMI类型的设置是:
<%
 ......
	
    
        
    
    
asp导出EXCEL数字格式及自动适应宽度的问题
下面直接进行代码演示:
<%
If Response.IsClientConnected Then 
Response.Flush 
Else 
Response.End
End If
Set xlApplication = Server.CreateObject("Excel.Application")
xlApplication.Visible = False
xlApplication.Workbooks.Add
Set xlWorksheet = xl ......
	
    
        
    
       public static void SetTreeNode(System.Web.UI.WebControls.TreeView treeRolePopedom, string rolecode,out string errMsg)
        {
            int k = 0;
       & ......
	
    
        
    
    MicrosoftVBScript语法错误(0×800A03E9)–>内存不足MicrosoftVBScript语法错误(0×800A03EA)–>语法错误
 
MicrosoftVBScript语法错误(0×800A03EB)–>缺少?’:’
 
MicrosoftVBScript语法错误(0×800A03ED)–>缺少?’(’
 
Micros ......