Wrox Home  
Search P2P Archive for: Go

  Return to Index  

access_asp thread: help on Database access


Message #1 by Bindiya Phadte <bindiya@d...> on Tue, 18 Sep 2001 17:33:09 -0700 (PDT)
sir i am getting Error  when i run the program error is as follow :

ADODB.Connection error '800a0e7a' 



ADO could not find the specified provider. 



/accasp.asp, line 22 



source code  is :

<% @LANGUAGE="VBSCRIPT" %>



<%Option Explicit%>

<HTML>

<HEAD>

<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">

</HEAD>

<BODY>

<%

Dim adOpenForwardOnly,adLockReadOnly,adCmdTable

adOpenForwardOnly=0

adLockReadOnly=1

adCmdTable=2

Dim objConn,objRS

set objconn =Server.CreateObject("ADODB.Connection")

'objConn.Open "DSN=StaffClub"

set objRS =Server.CreateObject("ADODB.Recordset")



Dim strDatabaseType

strDatabaseType="Acess"

'strDatabaseType="Acess" 

objConn.Open "PROVIDER=Microsoft.Jet.OLEDB.5.0;"& _	

		"Data Source =c:\Inetpub\wwwroot\Staff.mdb;"& _

			"Persits Security Info =False"

objRS.Open "Club",ObjConn,adOpenForwardOnly,adLockReadOnly,addCmdTable

While Not objRS.EOF

Response.Write objRS("ID")&"<BR>"

objRS.MoveNext

Wend

objRS.Close

objConn.Close

set objRS=Nothing

set objConn =Nothing



%>



</body>

</html>

				  

				  

				  

			

</BODY>

</HTML>



please help 

Message #2 by "Craig Dunn" <craig.dunn@a...> on Tue, 18 Sep 2001 13:39:35 +0100
I  think



strDatabaseType="Acess"



should read



strDatabaseType="Access"



-----Original Message-----

From: bounce-access_asp-646935@p...

[mailto:bounce-access_asp-646935@p...]On Behalf Of Bindiya

Phadte

Sent: Wednesday, September 19, 2001 1:33 AM

To: Access ASP

Subject: [access_asp] help on Database access





sir i am getting Error  when i run the program error is as follow :

ADODB.Connection error '800a0e7a' 



ADO could not find the specified provider. 



/accasp.asp, line 22 



source code  is :

<% @LANGUAGE="VBSCRIPT" %>



<%Option Explicit%>

<HTML>

<HEAD>

<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">

</HEAD>

<BODY>

<%

Dim adOpenForwardOnly,adLockReadOnly,adCmdTable

adOpenForwardOnly=0

adLockReadOnly=1

adCmdTable=2

Dim objConn,objRS

set objconn =Server.CreateObject("ADODB.Connection")

'objConn.Open "DSN=StaffClub"

set objRS =Server.CreateObject("ADODB.Recordset")



Dim strDatabaseType

strDatabaseType="Acess"

'strDatabaseType="Acess" 

objConn.Open "PROVIDER=Microsoft.Jet.OLEDB.5.0;"& _	

		"Data Source =c:\Inetpub\wwwroot\Staff.mdb;"& _

			"Persits Security Info =False"

objRS.Open "Club",ObjConn,adOpenForwardOnly,adLockReadOnly,addCmdTable

While Not objRS.EOF

Response.Write objRS("ID")&"<BR>"

objRS.MoveNext

Wend

objRS.Close

objConn.Close

set objRS=Nothing

set objConn =Nothing



%>



</body>

</html>

				  

				  

				  

			

</BODY>

</HTML>



please help
Message #3 by "Chamara Ranasinghe" <chamara@l...> on Wed, 19 Sep 2001 11:31:10 +0600
Hi,

You have to add the driver in system DSN & try



chamara



-----Original Message-----

From: Bindiya Phadte [mailto:bindiya@d...]

Sent: Wednesday, September 19, 2001 6:33 AM

To: Access ASP

Subject: [access_asp] help on Database access





sir i am getting Error  when i run the program error is as follow :

ADODB.Connection error '800a0e7a' 



ADO could not find the specified provider. 



/accasp.asp, line 22 



source code  is :

<% @LANGUAGE="VBSCRIPT" %>



<%Option Explicit%>

<HTML>

<HEAD>

<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">

</HEAD>

<BODY>

<%

Dim adOpenForwardOnly,adLockReadOnly,adCmdTable

adOpenForwardOnly=0

adLockReadOnly=1

adCmdTable=2

Dim objConn,objRS

set objconn =Server.CreateObject("ADODB.Connection")

'objConn.Open "DSN=StaffClub"

set objRS =Server.CreateObject("ADODB.Recordset")



Dim strDatabaseType

strDatabaseType="Acess"

'strDatabaseType="Acess" 

objConn.Open "PROVIDER=Microsoft.Jet.OLEDB.5.0;"& _	

		"Data Source =c:\Inetpub\wwwroot\Staff.mdb;"& _

			"Persits Security Info =False"

objRS.Open "Club",ObjConn,adOpenForwardOnly,adLockReadOnly,addCmdTable

While Not objRS.EOF

Response.Write objRS("ID")&"<BR>"

objRS.MoveNext

Wend

objRS.Close

objConn.Close

set objRS=Nothing

set objConn =Nothing



%>



</body>

</html>

				  

				  

				  

			

</BODY>

</HTML>



please help 









  Return to Index