[IIS / ASP] Connect

[Wally-S]

Hi ik wil simpel een database connectie maken, maar krijg het op mijn pc niet werkend. Ik gebruik de volgende code:

code:

Set connect = Server.CreateObject("ADODB.Connection")
Connect = "DRIVER={Microsoft Access Driver (*.mdb)}; "
connect.open "diversen"

en krijg de volgende foutmelding:

code:

Error Type:
Microsoft VBScript runtime (0x800A01A8)
Object required: 'connect'
/index.asp, line 4

Regeld 4 is trouwens: connect.open "diversen"

Ik heb de database toegevoegd aan system DSN.
Wat zou het kunnen zijn?

En dan heb ik meteen nog een vraagje:
Als ik een nieuwe datasource wil maken in dystem DSN kan ik uit het volgende lijstje kiezen:

Wat is het verschil tussen de 2 met rood ervoor?

[Verwijderd]

Je deklareert de variabele connect voor een tweede keer. Eerst deklareer je hem als een object en vervolgens als een string.

Je moet de connectie als volgt opbouwen
SET connect = Server.CreateObject("ADODB.Connection")
connect.open "DRIVER={Microsoft Access Driver (*.mdb)}; "& "diversen"

De precieze details van de string achter connect.open weet ik niet. Moet je zelf maar wat testen.

[Verwijderd]

Op vrijdag 21 december 2001 18:48 schreef Wally-S het volgende: Wat is het verschil tussen de 2 met rood ervoor?

Waarschijnlijk niets, alleen de ene is engels talig de andere spaans ofzo

[Verwijderd]

Op vrijdag 21 december 2001 18:56 schreef 16523001 het volgende:
Je deklareert de variabele connect voor een tweede keer. Eerst deklareer je hem als een object en vervolgens als een string.

Je moet de connectie als volgt opbouwen
SET connect = Server.CreateObject("ADODB.Connection")
connect.open "DRIVER={Microsoft Access Driver (*.mdb)}; "& "diversen"

De precieze details van de string achter connect.open weet ik niet. Moet je zelf maar wat testen.

Sorry, onderstaande is voor een fileDsn en niet voor een systeem dsn!!

Ik zal een nieuwe plaatsen met een goeie

Hierbij heb je een goede code om een database te openen

Stop deze in een functie als bv OpenDbase zodat je hem kunt openen als het nodig is

bv

code:

function openDb()
dim strConn 'variabele voor databasepath

set dbconn = Server.CreateObject("ADODB.Connection")
strConn = Server.MapPath("mijndatabase.mdb")
objConn.ConnectionString ="Driver={Microsoft Access Driver (*.mdb)};DBQ="& strConn &";"
objConn.Open

end function

de variabele objConn moet je bovenin jou script declareren


gewoonlijk gebruik ik ook een functie voor het sluiten van de database bv

code:

Function CloseDB()

on error resume next
objConn.close
set objConn=nothing
on error goto 0

End Function

[Wally-S]

Heel vreemd, ik haal gewoon de middelste regel eruit en hij doet het.
Terwijl ik zeker weet dat ik dat ook al had geprobeerd.
Dit is hem dus nu:

code:

Set connect = Server.CreateObject("ADODB.Connection")
connect.open "diversen"

Vervolgens had ik nog een probleem met het refreshen van de pagina maar tijdens het typen van dit bericht zag ik dat j30a6n75 een goed idee gaf.

Op vrijdag 21 december 2001 19:47 schreef j30a6n75 het volgende:

gewoonlijk gebruik ik ook een functie voor het sluiten van de database bv

code:

Function CloseDB()

on error resume next
objConn.close
set objConn=nothing
on error goto 0

End Function

Met die close function werkt dat ook weer goed.
Bedankt.

[Verwijderd]

Hierbij de functie om vie een systeem dsn een database te openen

id de datasource string moet jij de username en passwoord vervangen met de gebruikersnaam , paswoord die jij hebt ingevuld bij het aanmaken van de Dsn

De functie CloseDb kun je wel gebruiken

code:

Function OpenDbase()

set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "Data Source=username;User ID=username;Password=password;"
objConn.Open

end Function