Har ett panikartat problem.
Webbhotellet vi ligger på verkar ha problem med att köra MySQL tillsammans med ASP. Databaskopplingen funkar hos fler andra, men här får man följande felmeddelande:
ADODB.Connection.1 error '80004005'
SQLState: S1000
Native Error Code: 2013
[TCX][MyODBC]Lost connection to MySQL server during query
/test.asp, line 12
Webbhotellet säger att de inte kan göra så mycket mer, då de inte är "experter på ASP".
Någon som vet nånting om detta?
Vore evigt tacksam! Måste få det att fungera innan nästa vecka!!
pirroMedlem sedan aug. 2001226 inlägg kod hjälper alltid alla på traven KOD KOD KOD
Okej, skickar med ett exempel. Men grejen är att det funkar lokalt, och det funkar även på andra webbhotell.
<% Option Explicit
Dim objConn, objRS
Dim arrRS
Dim i
Function dbConn()
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "driver={MySQL};server=******;uid=******;pwd=******;database=******"
Set dbConn = objConn
End Function
Function SQL(myCommand,strSQL)
Set objConn = dbConn()
If myCommand = 0 Then
Set objRS = objConn.Execute(strSQL)
If NOT objRS.EOF Then arrRS = objRS.GetRows Else arrRS = Null
Else
Set objRS = objConn.Execute(strSQL,,128)
End If
Set objRS = Nothing : Set objConn = Nothing
End Function
Call SQL(0,"SELECT pID, pName FROM products ORDER BY pName ASC")
If IsArray(arrRS) Then
For i = 0 to UBound(arrRS,2)
Response.Write arrRS(1,i) & "<br>"
Next
End If
%>
Det där verkar helt klart vara deras ansvar att ta tag i. Om din connection-string stämmer (med rätt lösenord mm) så är det ju ett problem med deras MySql som genererar ditt felmeddelande. Koden är ju korrekt för kopplingen mot db.
Ställ dem mot väggen.