<%
Dim objADOXDatabase
Set objADOXDatabase = Server.CreateObject("ADOX.Catalog") 
objADOXDatabase.Create _
  "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=C:/INetPub/jsa/bahamasgateway.com/web/mysearch.mdb"
%>