below is the actual asp connection file

Dim DataConn

Dim Temp_ConnectionString

' Temp_ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=True;User ID=barnhart_user;Initial Catalog=BarnhartPress;Data Source=IPADDRESS;Locale Identifier=1033;Connect Timeout=15;"

If Session("AccessLevel") >= 75 Then

Temp_ConnectionString = Application("DataConn_Admin_ConnectionString")'"Provider=SQLOLEDB.1;Persist Security Info=True;User ID=bhPress_admin;Password=REMOVEDPW;Initial Catalog=BarnhartPress;Data Source=SQLSRVR;Locale Identifier=1033;Connect Timeout=15;"

Else

Temp_ConnectionString = Application("DataConn_ConnectionString")'"Provider=SQLOLEDB.1;Persist Security Info=True;User ID=barnhart_user;Initial Catalog=BarnhartPress;Data Source=SQLSRVR;Locale Identifier=1033;Connect Timeout=15;"

End If

Set DataConn = Server.CreateObject("ADODB.Connection")

DataConn.ConnectionTimeout = Application("DataConn_ConnectionTimeout")

DataConn.CommandTimeout = Application("DataConn_CommandTimeout")

DataConn.Open Temp_ConnectionString