use Win32::OLE; $ConnStr = "DSN=DsnName;UID=UserName;PWD=pass; APP=PerlTest;WSID=MyComp;DATABASE=MyDB"; $Conn = Win32::OLE->new('ADODB.Connection'); $Conn->Open($ConnStr);