You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
21 lines
507 B
21 lines
507 B
<Job ID="ADOSample2">
|
|
<script language=PerlScript runat=server>
|
|
$conn=$WScript->CreateObject('ADODB.Connection', 'MyWSH_');
|
|
$conn->Open('ADOSamples');
|
|
|
|
if($conn->{State} == 1) {
|
|
$WScript->Echo("Connection Successful!")
|
|
}
|
|
else {
|
|
$WScript->Echo("Connection Failed ...");
|
|
}
|
|
|
|
sub MyWSH_ConnectComplete {
|
|
$WScript->Echo("ConnectComplete was fired ... ");
|
|
}
|
|
|
|
sub MyWSH_WillConnect {
|
|
$WScript->Echo("WillConnect was fired ... ");
|
|
}
|
|
</script>
|
|
</Job>
|