Done. I will resend these changes with the next submission.

Thanks Jenda.

Jenda Krynicky wrote:

> > I am about done with the first vision of where I want PerlSQL to go.
> > With a little more addition to preferences, entering sql statements, and
> > updating data with popup windows I will then give it a version 1.0
> > rating. Until then I am just going to stick to dates.
> >
> > --
> > Michael Kangas
> > [EMAIL PROTECTED]
>
> I have just two simple changes :
>
> On lines 238 and 239 you probably meant
>
>   $username = undef if (!($username = $userTextfield->Text()));
>   $password = undef if (!($password = $passTextfield->Text()));
>
> instead of
>
>   $username = 'undef' if (!($username = $userTextfield->Text()));
>   $password = 'undef' if (!($password = $passTextfield->Text()));
>
> And then in function Load_TBLs you should have this :
>
>    my $DSNstring;
>    if ($username) {
>     if ($password) {
>         $DSNstring = "DSN=$DSN;UID=$username;PWD=$password"
>     } else {
>         $DSNstring = "DSN=$DSN;UID=$username"
>     }
>    } else {
>     $DSNstring = $DSN;
>    }
>
>    $db = new ODBC($DSNstring);
>
> instead of
>
>    $db = new ODBC("DSN=$DSN;UID=$username;PWD=$password");
>
> With your code I was unable to connect to MS SQL data sources using
> trusted connection (without explicit username and password).
>
> Jenda
> == [EMAIL PROTECTED] == http://Jenda.Krynicky.cz ==
>  The phenomenon of UFO doesn't say anything about
>     the presence of intelligence in space.
>   It just shows how rare it is here on the earth.
>                                     A.C.Clarke

--
Michael Kangas
Anlon Systems, Inc.
[EMAIL PROTECTED]


Reply via email to