I want to Write ADO Code for ActiveX DLL to use in ASP Page

[emmfajis]

I want to Write ADO Code for ActiveX DLL to use in ASP Page, when i try to called it it will giving me the following error:
Error Type:
Microsoft VBScript runtime (0x800A01A8)
Object required:
I need anyone to assist me in doing this.
Thanks

[sashi]

Hi there,

Help is possible only if you could provide a little more information, such as, your current coding segment, it's alot more easier in that way. Will try to debug your code.. take care my fren.. :)

I want to Write ADO Code for ActiveX DLL to use in ASP Page, when i try to called it it will giving me the following error:
Error Type:
Microsoft VBScript runtime (0x800A01A8)
Object required:
I need anyone to assist me in doing this.
Thanks

[emmfajis]

Thank you, the following are the code i write with my VB6.0 project
Option Explicit
' Create a reference to Connection object
Public con As ADODB.Connectio n
' Create a reference to a Recordset object
Public rst As ADODB.Recordset

Public Function MyConnection()

Dim sConString As String
Dim sSQLString As String
' Create a new instance of the Connection object
Set con = New ADODB.Connectio n

' Create a new instance of the Recordset object
Set rst = New ADODB.Recordset

'Creating connection to Database
sConString = "Provider=Micro soft.Jet.OLEDB. 4.0;Data Source=C:\Progr am Files\Microsoft Visual Studio\VB98\Bib lio.mdb"

'Creating statement to Select information from Authors table
sSQLString = "SELECT TOP 10 Author FROM Authors WHERE Au_ID=10"
Set rst = con.Execute(sSQ LString)

End Function

So help me send the Debugging version and the correct code if possible u can send the code for the ASP Page too

Thank You

[sashi]

Hi there,

Your code seems to be ok, i didn't find any error's in your code, probably check the naming standard of your controls, i.e textbox, combobox.. take care my fren.. :)

Thank you, the following are the code i write with my VB6.0 project
Option Explicit
' Create a reference to Connection object
Public con As ADODB.Connectio n
' Create a reference to a Recordset object
Public rst As ADODB.Recordset

Public Function MyConnection()

Dim sConString As String
Dim sSQLString As String
' Create a new instance of the Connection object
Set con = New ADODB.Connectio n

' Create a new instance of the Recordset object
Set rst = New ADODB.Recordset

'Creating connection to Database
sConString = "Provider=Micro soft.Jet.OLEDB. 4.0;Data Source=C:\Progr am Files\Microsoft Visual Studio\VB98\Bib lio.mdb"

'Creating statement to Select information from Authors table
sSQLString = "SELECT TOP 10 Author FROM Authors WHERE Au_ID=10"
Set rst = con.Execute(sSQ LString)

End Function

So help me send the Debugging version and the correct code if possible u can send the code for the ASP Page too

Thank You

[emmfajis]

Thank you my Friend, I will try to check all what you ask me to. But if i can't solve it i will let you know.

Thanks friend.

Hi there,

Your code seems to be ok, i didn't find any error's in your code, probably check the naming standard of your controls, i.e textbox, combobox.. take care my fren.. :)

[Spodgy]

I don't see a connection open statement in the code?

[willakawill]

'Creating connection to Database
sConString = "Provider=Micro soft.Jet.OLEDB. 4.0;Data Source=C:\Progr am Files\Microsoft Visual Studio\VB98\Bib lio.mdb"

That's right. You have a connection string ready to be used by the connection object and you miss the step:

con.Open sConString