SQL 7.0 crash and reinstall and now odbc connections wont connect

  • A company pulled me in and wanted me to help with their sql server after a raid failure.

    They retrieved the data off the drive and re installed on a virtual server.

    They hired another company to install sql 7 from scratch and import the data.

    The server hosts their website which ties to the SQL server and 2 programs which store data on the sql server.

    Now is the part i am confused on and am sure you guys will know it.

    I think everything is setup to work through odbc connections. (dsn)

    The website is showing this error

    Microsoft OLE DB Provider for ODBC Drivers error '80040e4d'

    [Microsoft][ODBC SQL Server Driver][SQL Server]Login failed for user 'bhPress_user'.

    /connect.asp, line 15

    On the server there are system dsn's and file dsn's in the odbc list.

    Since the company installed SQL 7 from scratch i believe sql lost all the login information? Am I on the right path?

    How do I go about setting up all these connections back up?

    All help is greatly appreciated and thanks for your time guys.

    - Jarrod

  • 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

Viewing 2 posts - 1 through 1 (of 1 total)

You must be logged in to reply to this topic. Login to reply