<% Dim cn Set cn = server.createobject("adodb.connection") cn.connectionstring = "Driver={Mysql};Server=sql4a.your-server.co.za; Database=miracln_db1; UID=miracln_1; PWD=NyANqzs8" %>