Thread Zählen von Datensätzen auch nach Dependenzen (16 answers)
Opened by geloescht at 2012-09-26 10:37

geloescht
 2012-09-26 12:28
#162045 #162045
User since
2012-06-19
141 Artikel
BenutzerIn
[default_avatar]
Hallo pq

Zu Fetch-Array:
Ich dachte, dass in einem Array immer mehrere Dinge drinstehen. Da ich aber nur eine Zahl wollte, kam mir das Array falsch vor - sorry, mein Fehler.

Quote
wie mir scheint, hast du das nicht mal gelesen.


Doch, ich habs gelesen *ehrlich*

Quote
thread ist für dich abgehakt...


Nein, "abgehakt" bedeutet, problem gelöst. Die Richtige Antwort auf die Frage war dabei und hilfreich. Das ist ein positives Symbol - deshalb ist der Haken ja auch grün ;-)

Quote
, also wird auch nicht mehr reingeschaut? nicht mal eine minute nach deinem letzten beitrag? finde ich schade.


Doch hab reingeschaut. Dieses Fragezeichen und das Nachträgliche Aufführen der Skalare ist erst einmal "Mehrschreibarbeit", und deshlab auch unübersichtlicher.

Zu den erwähnten Sicherheitsproblem:
Ich nehme mal an, dass man mit geschickten Eingaben Unfug treiben kann. Ähnlich dem XSS (Cross Site Scripting). Nun, Dieses Programm wird nur lokal genutzt. Ausser mir, und später eventuell eine Mitarbeiterin (400,00 oder mehr) nutzt das keiner. Wo soll denn dann ein Sicherheitsproblem sein?

Viele Grüsse HP-User

PS.: Jetzt zeigt er die Menge an, musste aber trotzdem minus eins rechnen - wegen dem Kopf:

Code (perl): (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
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70

###################################################################
WerteAnzeigen:
###################################################################

system("clear");
print "+-----------------------------------------------------+ \n";
print "| E********** / Daten-Verwaltungs-Programm (EZ-DVP) | \n";
print "+-----------------------------------------------------+ \n";
print " \n";
print ">> Statistik aufrufen << \n";
print " \n";

%zuordnung=(
           kunden => {
           file => 'kunden.csv',
           col_names   => ['kdnummer', 'kddatum', 'kdfirma', 'kdstrasse', 'kdhausnummer', 'kdplz', 'kdort', 'kdland', 'kdansprechpartner', 'kdtelefon', 'kdfax', 'kdemail'],
           },
           );
# Verbindung aufbauen
$dbh = DBI->connect("DBI:CSV:", undef, undef, {
                                              # Zeilenseparator
                                              csv_eol => "\x0A",
                                              # Spaltenseparator:
                                              csv_sep_char => ",",
                                              # Verzeichnis mit den Dateien
                                              f_dir => $Bin,
                                              # Zuordnung Dateiname -> Tabelle
                                              csv_tables => \%zuordnung,
                                              # bei Fehlern immer sterben:
                                              RaiseError => 1,
                                              }
                      ) or die($DBI::errstr);
$sth=$dbh->prepare("SELECT COUNT(*) FROM kunden");
$sth->execute();
my ($countKd) = $sth->fetchrow_array;
$countKd = $countKd - 1;
$sth->finish();
$dbh->disconnect();

%zuordnung=(
           kurzgeschichten => {
           file => 'kurzgeschichten.csv',
           col_names   => ['kgnummer', 'kgtitel', 'pakettyp', 'status', 'statusdatum', 'kdnummer', 'kdkonto'],
           },
           );
# Verbindung aufbauen
$dbh = DBI->connect("DBI:CSV:", undef, undef, {
                                              # Zeilenseparator
                                              csv_eol => "\x0A",
                                              # Spaltenseparator:
                                              csv_sep_char => ",",
                                              # Verzeichnis mit den Dateien
                                              f_dir => $Bin,
                                              # Zuordnung Dateiname -> Tabelle
                                              csv_tables => \%zuordnung,
                                              # bei Fehlern immer sterben:
                                              RaiseError => 1,
                                              }
                      ) or die($DBI::errstr);
$sth=$dbh->prepare("SELECT COUNT(*) FROM kurzgeschichten");
$sth->execute();
my ($countKg) = $sth->fetchrow_array;
$countKg = $countKg - 1;
$sth->finish();
$dbh->disconnect();

#Testausgabe

print "Anzahl Kunden :           $countKd \n";
print "Anzahl Kurzgeschichten:   $countKg \n";

Last edited: 2012-10-05 14:46:20 +0200 (CEST)
Past brought us "SYS 64738". Present brought us "ctrl+alt+del". But what will future bring?

View full thread Zählen von Datensätzen auch nach Dependenzen