Set conn = Server.CreateObject("ADODB.Connection")
'on error resume next
conn.open(conn_str)
if err <> 0 then
'database connection failed
response.write("Error when connecting to database. The database may be down or not setup properly.")
response.end
end if
<%
'you must specify db login here
'Check this statement
db_server = "nfiserver001"
db_user = "admin"
db_pass = "admin"
'Check this statement
db_name = "ashanti"
Set conn = Server.CreateObject("ADODB.Connection")
'on error resume next
conn.open(conn_str)
if err <> 0 then
'database connection failed
response.write("Error when connecting to database. The database may be down or not setup properly.")
response.end
end if
%>
If nfiserver001 server exists and ashanti database exists, It runs normally, I did.