<%
Dim Conn
Set Conn = Server.CreateObject ("ADODB.Connection")
strProvider = "Driver={Microsoft Access Driver (*.mdb)}; DBQ="
& Server.MapPath("database.mdb")
Conn.Open strProvider
%>
MS SQL 2000
<%
Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={SQL Server};Server=ServerIP;Database=databasename;UID=username;PWD=password;"
%>
Database name
should be tough to guess for security reasons
Avoid using
lengthy database names
Make sure you
upload database in "httpdocs" folder
You might not be
able to access your database if your connectivity is slower.
If your account is suspended due to excess bandwidth usage
or server usage, your access will be suspended.