Help for this page
use Win32::OLE; use Win32::OLE::Const 'Microsoft ActiveX Data Objects'; ... } else { print "This doesn't work!!!\n"; }
$strProvider = 'Provider=sqloledb;Data Source=MyServerName;Initial Cat +alog=MyCatalog;'; $strProvider .= 'User Id=MYMACHINE\MyName;Password=MyPassword';