Periodisk fejl på MySQL server

hvordan opdatere du din database??

mysqlimport eller???

if request.form("id") = 9999 then ' opretter ny side
    sql = "insert into tekst (tekst, titel, dato, init) values ('" & tekst & "', '" & request.form("titel") & "','" & dato & "','" & session("S_bnavn") & "')"
  else ' opdaterer den eksisterende side
    sql = "update tekst set tekst ='" & tekst & "', titel ='" & request.form("titel") & "', dato='" & dato & "', init='" & session("S_bnavn") & "' where id = " & request.form("id")
  end if
  Conn.execute(sql)
  Conn.Close
  Set Conn = nothing

Du får lige ini'en med også.

<%
  Set Conn = Server.CreateObject("ADODB.Connection") 
  Conn.Open("DSN=proteccms")
%>

Prøv denne

<%
SQLserveradr="Localhost"
SQLPort="3306"
SQLlogin="DIN BRUGERNAVN"
SQLpassword="DIN KODE"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "driver={MySql};server=" & SQLserveradr & ";Port=" & SQLPort & ";uid=" & SQLlogin & ";pwd=" & SQLpassword
%>

Giver desværre samme fejl :(

<%
SQLserveradr="Localhost"
SQLPort="3306"
SQLlogin=""
SQLpassword=""
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DSN=proteccms;driver={MySql};server=" & SQLserveradr & ";Port=" & SQLPort & ";uid=" & SQLlogin & ";pwd=" & SQLpassword
%>

navn og password er fjernet i eksemplet her.

så må det være noget med hvornår du åbner eller lukker din DB forbindelse