14. marts 2006 - 20:16Der er
6 kommentarer og 1 løsning
Bruge funktion til at kalde data forbindelse
Hvor er det ikke muligt at gøre følgende:
Function Dataforbindelse %><!--#include virtual="dataforbindelse.inc" --><% End Function
eller dette
Function Dataforbindelse Set Conn = Server.Createobject("ADODB.Connection") strConnect = "Provider=SQLOLEDB.1;Server=xx;database=xx;uid=xx;pwd=xx;network=DBMSSOCN" Conn.Open strConnect End Function
Begge to vil virke. Den første kræver at include filen altid findes.
Dog vil man i begge tilfælde kun kunne bruge objektet Conn inde i funktionen Dataforbindelse da Conn er deffinete inde i funktionen og dermed bliver det en lokal varialbe.
Hvis du vil bruge Conn uden for funktion skal du bruge nr. 2 og flyte Set Conn = ... ud som en global variable uden forfunktionen, men du kan godt bruge funktion til at åbne forbindelsen:
<% Set Conn = Server.Createobject("ADODB.Connection")
Function Dataforbindelse strConnect = "Provider=SQLOLEDB.1;Server=xx;database=xx;uid=xx;pwd=xx;network=DBMSSOCN" Conn.Open strConnect End Function %>
eagleeye >> Det er vel kun nødvendigt at dim'e variablen uden for funktionen, så skulle det da stadig virke: Dim Conn Function Dataforbindelse Set Conn = Server.Createobject("ADODB.Connection") strConnect = "Provider=SQLOLEDB.1;Server=xx;database=xx;uid=xx;pwd=xx;network=DBMSSOCN" Conn.Open strConnect End Function
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.