Entwickler-Ecke

Datenbanken - E-Mail Adresse in die Datenbank hinzufügen !


Jagg - Do 25.07.02 11:39
Titel: E-Mail Adresse in die Datenbank hinzufügen !
Hallo,Leute !

Ich habe eine CheckBox mit dem Titel "E-Mail Adresse auch an GruppenVersand verschicken" !
Der "GruppenVersand" ist eine ComboBox !
Wenn die CheckBox aktiv ist,soll er die EmpfängerAdresse in die jeweilige Tabelle schreiben,die ich aus der ComboBox ausgewählt habe !

Wie mache ich das ?

Jagg !

PS : Muss ich eine TComboBox oder eine DBComboBox auswählen ?


Renegade - Do 25.07.02 12:53

Sorry ich verstehe nicht ganz worauf du hinauswillst. :?

Kannst du dein Problem noch ein wenig genauer Posten (Schritt für Schritt). :)


SnergleTheDwarf - Do 25.07.02 13:41
Titel: eine möglichkeit wie ich denke ...

Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
if ckb.checked then
begin
  table.Active := False;
  table.TableName := ComboBox.Text
  table.Active := True;
  table.edit;
  table.fieldbyname('Email').AsString = edit.text; // enthält die email
  table.post
end; // END OF if (cbk)


und das dürchläufst du für alle notwendigen einträge ...
vielleicht vorher noch checken ob table existiert
(wenn filebasierend dann:

Quelltext
1:
   if exists (<PFAD> + <TableName>) then ...                    

)
(wenn nicht filebasierend ... kannst du abchecken ob du die DB öffnen konntest, wenn nicht dann ne meldung)


Jagg - Do 25.07.02 13:53

Ok,nochmal !

Ich habe 4 Komponenten : 1 Editfeld mit dem Namen "Empfänger",1 ComboBox,1 CheckBox und einen Button mit dem Namen "Versenden"
Wenn ich jetzt die Empfänger Adresse eingebe und dazu noch die CheckBox markiere soll er die EmpfängerAdresse in einen *.dbt Datei eintragen !

Aber er soll immer die EmpfängerAdresse in die jeweilige datenbank schreiben die ich in der ComboBox ausgewählt habe !

Also muss das Programm erkennen welche Datebank (*.dbf) ausgewählt ist und sie dann aktivieren !

Jagg !


Jagg - Fr 26.07.02 08:39

ich habe das gefühl keiner versteht mein problem oder irre ich mich da !

Ich hab doch schon so gut erklärt wie ich kann !


wwerner - Fr 26.07.02 08:45

Stimmt keiner versteht dich!
Wieso heißt der Button "Versenden" und nicht "In DB eintragen" ?
Bisher wurde bein Druck auf "versenden" doch die DB geöffnet und an alle in der DB eigetragenen Adressen eine Mail versendet. Was willst du jetzt genau machen? Wie ich dir schon mal gesagt habe: Poste ab und zu mal ein kleines Stück Quellcode. Dann ist es viel leicher dir zu helfen.


Jagg - Fr 26.07.02 10:49

Hmmm.... !
Naja,der Button kann auch "in DB eintragen heissen",aber das ist doch egal oder ??? :-)

So hier ist mal ein Code :


Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
if CheckBox1.Checked then
    begin
      Table1.Active := False;
      Table1.TableName := ComboBox1.Text;
      Table1.Active := True;
      Table1.Edit;
      Table1.Open;
      Table1.Fieldbyname('Email').AsString := Edit1.Text;
      Table1.Post;
    end;


Also,der soll beim Druck von dem Button das alles ausführen !
Das Feld wo ich die Empfänger Adresse eintrage muss das ein Editfeld sein oder ein DBEditfeld ???

ich hoffe ihr könnt mir jetzt helfen !

Jagg!


wwerner - Fr 26.07.02 10:57


Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
if CheckBox1.Checked then 
    begin 
      Table1.Active := False; 
      Table1.TableName := ComboBox1.Text; 
      //Table1.Active := True; 
      Table1.Open; 
      Table1.Edit;       
      Table1.Fieldbyname('Email').AsString := Edit1.Text; 
      Table1.Post; 
    end;


SnergleTheDwarf - Fr 26.07.02 11:45
Titel: mach doch mal icq an dann kann man mit dir direkt quatschen
außerdem finde ich es toll daß mein quellcode so oft auftaucht ...
wie soll ich sagen:"hat was ..."

oder ist dein prob bereits gelöst


Jagg - Fr 26.07.02 12:58

Meine Datenbank heisst Mail.dbf !
Aber er sagt immer die fehlermeldung "Tabelle nicht vorhanden ,Mail.dbf "


wwerner - Fr 26.07.02 13:04

Fehlt mal wieder der Path?


Jagg - Fr 26.07.02 13:23

ne alles eingestellt !


wwerner - Fr 26.07.02 13:28

aber nicht in dem Quelltext den du gepostet hast :!:


Jagg - Fr 26.07.02 13:39

Ich habs habe nur einen backslash hinter dem wort "Datenbank" vergessen !

Jagg !