<% Option Explicit %> ASP & MySQL Tutorial <% On Error Resume Next '*** Not Show ASP Error ***' Dim Conn Set Conn = Server.Createobject("ADODB.Connection") Conn.Open "DRIVER={MySQL ODBC 5.1 Driver}; SERVER=localhost;UID=db_user; " & _ "pwd=db_password;database=yourdomain_com_dbname;option=16384;" If Err.Number <> 0 Then Response.write("Database cannot connect Error = " & Err.Description) Else Response.write("Database connected.") End If Conn.Close() Set Conn = Nothing %>