Databaskoppling!!!

Jag undrar hur man gör det enkelt för sig när man vill ändra en databaskoplling ifrån det gamla systemet till mysql dasabaskoppling. Så här ser det gamla systemet ut, jag vill behålla databasen som den är idag om det går?

<table border="0" width="469" height="16" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#111111">

<%
grupp = request.querystring("art")
DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtemp=dsntemp & "DBQ=" & server.mappath("databaser/main.mdb")
sqlstmt = "SELECT * FROM foretag where art = '" & grupp & "' order by id"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sqlstmt, DSNtemp, 3, 3
TotalRecs = rs.recordcount
x = 0
For x = 1 to 40
If rs.eof then
Exit For
Else

	id = rs("id")
	titel1 = rs("titel")
	pentry1 = rs("pentry")
	im = rs("image")

%>

\<tr\>
  \<td width="469" height="20" valign="top"\>
 \<font color="#000000" face="verdana" size="2"\>\<b\>\<% =titel1 %\>\</b\>\<br\>\<img SRC="bilder/\<% =im %\>" VSPACE=0 BORDER=0 ALIGN="RIGHT"\>\<font color="#000000" face="verdana" size="2"\>\<%response.write replace(pentry1, vbCrLf, "\<br\>")%\>\<br\>\<br\>\</tr\>
\</tr\>
     \<%

rs.MoveNext
End If
next%>
</table>

HEJ!

Jag är inte med på vad du menar med "gamla systemet", men gissar att du vill byta till MySQL?

Troligtvis har webbhotellet de connectionstrings du behöver, annars finns de på http://www.connectionstrings.com/.

Att göra det enkelt för sig kan innebära att lägga db-anslutningen i en include-fil, vilket du inte har gjort.
Därför måste du öppna alla sidor där db-anslutning görs och ändra.
Vis av ditt misstag gör du därför om det till en include-fil denna gång. :i

Om du vill ha samma struktur på din databas bestämmer du själv, men givetvis vill du inte lägga tid på att designa om något som fungerar. Importera databasen och kontrollera fälttyper och nycklar.

Beroende på dina frågors komplexitet får du kanske justera vissa av dem till MySQL-dialekt.