Öppna och stäng databas

I stället för att skriva databas kopplingen och stängningen varje gång du ska hämta data så kan du göra på detta enkla sätt.

Öppna databasen:

<%

Sub dbo(Connect)

 Set Connect = Server.CreateObject("ADODB.Connection")

 Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("db/databas.mdb")

End Sub

%>

Om du har mysql databas så ändrar du bara "Connect.Open":

<%

Connect.Open "Driver=MySQL ODBC 3.51 Driver;Server=LOCALHOST;UID=ROOT;PWD=PASSWORD;Database=DATABASE;Option=16384"

%>

Stäng databasen:

<%

Sub dbc(Connect)

 Connect.Close()

 Set Connect = Nothing

End Sub

%>

EDIT:
När du ska hämta data från databasen måste du anropa sub:en.

<%

' Öppna databasen



Call dbo(Connect)



 ' här lägger du din sql osv.





' Stäng databasen



Call dbc(Connect)

%>

Detta tips skapades 2007-08-19 12:14:50 av Gimbergsson. Det har lästs 200 gånger. ||

Kommentarer

Ingen har kommenterat denna artikel än.