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]