MOVE ON IF CAN'T CONNECT 1

[sshafe]

I'm writing a script to move through a list of SQL Servers. I make a connectivity check on each in the list. My problem now is the error handling. If I cannot connect to the server, I want to write to a log file and move to the next server on the list, but I'm having problems catching the error within the script. "SQL SERVER DOES NOT EXIST OR ACCESS DENIED" 80004005 pops up.
Ideas??

Thanks in advance
;-)

 

[JPBERGEZ]

Hi
A basic way should be to use the On Error Resume Next statement that allows you to bypass the errors.
But this solutions does not trap any error at all. So you will not be able to log the error.
Perhaps another kind of test to validate your connection.
Something like MapNetworkdrive to the target server (SQL server) and a test on a file which is supposed to exist on the SQL server (the database file for example)...

 

[dilettante]

Your error handler logic could log:

Err.Number
Err.Description
Err.Source

Be sure to call the

Err.Clear

method in your error handler if you intend to continue processing after errors occur.

It is always good to consult the scripting documentation:

http://msdn.microsoft.com/library/default.asp?url=/nhp/default.asp?contentid=28001169&frame=true

Also look into the ADO

Errors

collection:

http://msdn.microsoft.com/library/d...ry/en-us/ado270/htm/mdaobj02_1.asp?frame=true

... and the

Error

object:

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/ado270/htm/mdaobj01_9.asp

This is intended to be part of any ADO error processing logic, but a surprising number of developers just ignore it. Then they complain there isn't any error feedback!

;-)

 

[sshafe]

I've done my best to capture the errors, but what I have is not capturing it. I know for a fact that each server on my list exists, so I just need to capture that it could not make a connect and move on

IF ConnectionName2.State <> 0 Then
ConnectionName2.Close ' Kills Database Connection
ConnectionName2.Open(&quot;DSN=&quot; & rsServers.Fields(&quot;sqlservername&quot)
ELSE
ConnectionName2.Open(&quot;DSN=&quot; & server)
IF connectionname2.State <> 1 Then
LogFile.WriteLine(..............


Thanks again in advance ;-)

 

[tsuji]

Hello sshafe,

Try instead...

if ConnectionName2.errors.count<>0 then
    'display or whatever actions based on .errors(0).number
else
    'some other actions
end if

regards - tsuji