使用interbase做Asp的后台数据库

使用interbase做Asp的后台数据库
Bingo @ 2005-01-21 22:11

安装interbase的oledb驱动，下载eng_IBProviderFree.exe

创建data.ibp文件，作为连接参数信息文件，代码如下
Persist Security Info=0;
User ID=SYSDBA;
password=masterkey;
Data Source=data source=localhost:E:/Borland/InterBase/examples/employee.gdb;
Prompt=4;
OLE DB Services=-1;
ctype=;
role=;
garbage_collect=-1;
dialect=1;
auto_commit=0;
auto_commit_level=65536;

创建conn.asp,代码如下
<%
dim cn
Set cn=Server.CreateObject("ADODB.Connection")
'connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'如果你的服务器采用较老版本Access驱动，请用下面连接方法
'connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
'conn.Open connstr
cn.Provider = "LCPI.IBProvider.1"
'cn.Open "file name=E:/Borland/web/data.ibp"
cn.Open "data source=localhost:E:/Borland/InterBase/examples/Database/employee.gdb;ctype=win1251;" & _
         "auto_commit=true;auto_commit_level=0x1000;" & _
         "user id=SYSDBA;password=masterkey"

%>
ok了,还有另一个东东可以关注http://www.sibprovider.com/en_us/files/sibprovi.zip

 

 

 http://bingolin.ycool.com/archive.p1.html

 

 

 

 

 

========================================================

http://www.ibprovider.com/eng/examples/example_01.html

Sub

 sample1()

 Dim

 cn As

 New

 ADODB.Connection

 

 'use connection string from file "employee.ibp
":



 'data source=localhost:d:/database/employee.gdb;User ID=gamer;password=vermut;



 'ctype=win1251;auto_commit=true;



 

 cn.Open "file name=d:/database/employee.ibp
"


 cn.Close

 

 'Standart connection methods



 cn.Provider = "LCPI.IBProvider"


 cn.Open "data source=localhost:d:/database/employee.gdb;ctype=win1251"
, _

         "gamer"
, "vermut"


 cn.Close

 

 ' Using user id



 cn.Open "data source=localhost:d:/database/employee.gdb;ctype=win1251;"
 & _

         "user id=gamer;password=vermut"


 cn.Close

 

 ' Using user



 cn.Open "data source=localhost:d:/database/employee.gdb;ctype=win1251;"
 & _

         "user=gamer;password=vermut"


 cn.Close

 

 ' Work in auto commit mode with read commited isolation level



 cn.Open "data source=localhost:d:/database/employee.gdb;ctype=win1251;"
 & _

         "auto_commit=true;auto_commit_level=0x1000;"
 & _

         "user id=gamer;password=vermut"


 cn.Close

 

 ' Switching connection to auto commit mode



 cn.Open "data source=localhost:d:/database/employee.gdb;ctype=win1251;"
 & _







         "user id=gamer;password=vermut"


 cn.Properties("Session AutoCommit"
) = True

          'enable auto commit



 cn.Properties("Autocommit Isolation Levels"
) = 4096
 'read commited=0x1000



  

End

 Sub

 'sample1



可以下载 一个 driver

===============================================================

 
 

  
  
         网上介绍用ASP访问INTERBASE数据库的资料很少,经过几天的奋斗终于成功的解决了这个问题.现把部份代码和一些资料贡献给大家.
  
  
<%@ language="vbscript"%>         
  
  
str1 = "Driver={XTG Systems Interbase6 ODBC driver};uid=sysdba;pwd=masterkey;Data Source=ly"
Set conn = Server.CreateObject("ADODB.Connection")
conn.open str1
Set rs = Server.CreateObject("ADODB.Recordset")
sqll="select * from GUNIT"
rs.open sqll,conn,1,3
rs.addnew
rs("id")=18
rs("name")="INTERBASE"
rs.update
  
  
rs.close
set rs=nothing
conn.close
set conn=nothing
  
  
在上例的连接数据库的字符串中,我采用的是XTG公司的开发的INTERBASE ODBC驱动程序.网上大部分资料包括Borland本身介绍的技术文档都是采用Easysoft的驱动(现Easysoft公司已经推出能支持IB7的驱动了).但我在采用Easysoft的没有成功.
  
  
下面是BORLAND对用ASP访问IB数据库提出的解决方案的地址:
  
  
http://community.borland.com/article/0,1410,27152,00.html