Schrift
[thread]778[/thread]

Perl Problem Code (Seite 4)

Leser: 1


<< |< 1 2 3 4 5 >| >> 49 Einträge, 5 Seiten
GwenDragon
 2006-07-19 16:37
#8367 #8367
User since
2005-01-17
14835 Artikel
Admin1
[Homepage]
user image
Sorry, ich brauch Pause. Kopfweh doch zu arg. Da vergesse ich manchmal Sachem im Code.
zeus75
 2006-07-19 16:37
#8368 #8368
User since
2006-02-19
35 Artikel
BenutzerIn
[default_avatar]
ok... ich probiere es..
aber wie bekomme ich diese

Code: (dl )
1
2
Software error:
Can't execute statement: You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near 'siteid FROM sites WHERE webmaster_email='counti_email=info@test.de; pat' at line 1 at spider.pl line 12.


fehlermeldung noch weg?

danke
renee
 2006-07-19 16:38
#8369 #8369
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Du deklarierst ein Array @userinfo und verwendest später $userinfo als Hashref. Ist sicherlich nicht so gewollt.

Auch beim prepare würde ich noch eine Fehlerbehandlung machen...
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
GwenDragon
 2006-07-19 16:40
#8370 #8370
User since
2005-01-17
14835 Artikel
Admin1
[Homepage]
user image
Nimm meinen zuletzt geposteten Code.
zeus75
 2006-07-19 16:40
#8371 #8371
User since
2006-02-19
35 Artikel
BenutzerIn
[default_avatar]
[quote=renee,19.07.2006, 14:38]Du deklarierst ein Array @userinfo und verwendest später $userinfo als Hashref. Ist sicherlich nicht so gewollt.

Auch beim prepare würde ich noch eine Fehlerbehandlung machen...[/quote]
seid mir nicht böse.. aber sprecht deutsch mit mir :-((
blicke jetzt schon kaum durch...

danke
GwenDragon
 2006-07-19 16:47
#8372 #8372
User since
2005-01-17
14835 Artikel
Admin1
[Homepage]
user image
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
use CGI::Carp qw(fatalsToBrowser);
use CGI::Cookie;
use DBI;
use CGI;

my $db = DBI->connect( 'dbi:mysql:usr_web41_1', 'web41', 'xxxxxx') ||
   die "Kann keine Verbindung zum MySQL-Server aufbauen: $DBI::errstr\n";

my %cookies = fetch CGI::Cookie;
my $userinfo;

if(check_login() && not validate_login() ) {
 logout_user();
}
else {
 my $sth = $db->prepare("SELECT * FROM sites WHERE webmaster_email=? AND webmaster_url=? LIMIT 1")
        or die( "cant prepare SQL: $DBI::errstr");
 $sth->execute($cookies{'email'}, $cookies{'url'} )
        or die "Can't execute statement: $DBI::errstr";  
 $userinfo = $sth->fetchrow_hashref; # Hashreferenz!
}

#...
# später:

print 'URL: ', CGI::textfield( 'url', $userinfo->{'domain'} ),
CGI::br(),
'E-Mail: ', CGI::textfield( 'email', $userinfo->{'webmaster_email'} );


So, mehr geht heute nicht mehr.\n\n

<!--EDIT|GwenDragon|1153313295-->
zeus75
 2006-07-19 16:49
#8373 #8373
User since
2006-02-19
35 Artikel
BenutzerIn
[default_avatar]
ok.. habe alles in der datei stehen und es kommen keine fehlermeldungen mehr....

nur dieser teil ist mir noch nicht ganz klar...

Code: (dl )
1
2
3
4
5
6
#...
# später:
use CGI;
print 'URL: ', CGI::textfield( 'url', $userinfo->{'domain'} ),
CGI::br(),
'E-Mail: ', CGI::textfield( 'email', $userinfo->{'webmaster_email'} );


dies muss ich sicherlich hier unterbringen.. also in den inputfehlern..

Code: (dl )
print " <td width=30% bgcolor=#f8f8f8 height=50><font face=verdana color=#666666 size=2 valign=top><input size=38 type=text name=domain disabled value=http://$userinfo>&nbsp;</font> ";


wie bringe ich die beiden sachen schön zusammen damit es funktioniert?

und noch mal vielen dank... sieht so aus als wenn es gleich funktioniert... :-)\n\n

<!--EDIT|zeus75|1153313377-->
Gast Gast
 2006-07-19 17:12
#8374 #8374
Ein bisschen Perl musst du schon noch selbst lernen ;)
zeus75
 2006-07-19 22:07
#8375 #8375
User since
2006-02-19
35 Artikel
BenutzerIn
[default_avatar]
moinsen,

also... habe den Quelltext verstanden und auch eingebunden... nur leider funktioniert es nicht.
ich bin am verzweifeln... heute wieder 8 stunden reingesteckt in diesem .... und nicht geschafft :-(

hat hier vielleicht noch jemand eine idee woran es liegen kann das es nicht funktioniert?

gruss
renee
 2006-07-19 22:10
#8376 #8376
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Nochmal: Ohne Fehlermeldung und Code lässt sich (fast) nix sagen!

Was hast Du bisher gemacht? Was läuft wie es soll? Was läuft nicht? Wie sollte es laufen? Was macht es stattdessen?

Wiki:Wie frage ich in einem Forum?
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
<< |< 1 2 3 4 5 >| >> 49 Einträge, 5 Seiten



View all threads created 2006-07-18 10:52.