Say my database name is Jessica_DB, my user name is jessica, and my password jessica_pwd.
Perl
To connect to Microsoft SQL Server using Perl with Win32::ODBC module
use Win32::ODBC;
my $dsn = "DSN=Jessica_DB;UID=jessica;PWD=jessica_pwd;";
my $DB = Win32::ODBC->new($dsn);
$DB->Sql("SELECT f1, f2, f3 FROM MyTable");
$DB->FetchRow();
($f1, $f2) = $DB->Data("f1", "f2");
print "f1 = ". $f1;
$DB->Close();
VBScript
To connect to MS SQL Server using VBScript
Const adOpenStatic = 3
Const adLockOptimistic = 3
Set objConnection = CreateObject("ADODB.Connection")
Set objRecordSet = CreateObject("ADODB.Recordset")
objConnection.Open _
"Provider=MSDASQL.1;Data Source=Jessica_DB;" & _
"Trusted_Connection=Yes;" & _
"User ID=jessica;Password=jessica_pwd;"
objRecordSet.Open "SELECT * FROM MyTable", _
objConnection, adOpenStatic, adLockOptimistic
objRecordSet.MoveFirst
Wscript.Echo objRecordSet.RecordCount
Python
To connect in Python, check out pymssql