7. Januar 2008 17:42
7. Januar 2008 17:49
Ich hoffe du erschlägst mich jetzt nicht.
7. Januar 2008 17:55
WITH Cust DO BEGIN
VALIDATE(Passwort,Passwort);
//Hier stand früher noch ein MODIFY
END;
CLEAR(CustomerProfile);
Cust.RESET;
Cust.SETRANGE("No.","No.");
Cust.SETFILTER("E-Mail",'<>%1','');
Cust.SETFILTER(Blocked,'=%1 | =%2',0,2);
CustomerProfile.SETTABLEVIEW(Cust);
CustomerProfile.RUN;
IF Customer.Passwort = '' THEN BEGIN
WITH Customer DO BEGIN
VALIDATE(Passwort,password);
//MODIFY; Zur Zeit auskommentiert
END;
END;
7. Januar 2008 18:26
CLEAR(CustomerProfile);
Cust.RESET;
Cust.SETRANGE("No.","No.");
Cust.SETFILTER("E-Mail",'<>%1','');
Cust.SETFILTER(Blocked,'=%1 | =%2',0,2);
CustomerProfile.SETTABLEVIEW(Cust);
CustomerProfile.RUN;
Cust - OnAfterGetRecord
...
IF Cust.Passwort = '' then begin
NewPassword := ErzeugeNeuesPassword //Aus dem Passworgenerator laden
Cust.Passwort := NewPassword;
end;
Cust.MODIFY(TRUE);
...
7. Januar 2008 18:29
7. Januar 2008 18:31
8. Januar 2008 18:23
9. Januar 2008 09:30
9. Januar 2008 14:04
woger hat geschrieben:Wäre es ein Ansatz, innerhalb des Reports keinen Modify zu machen, sondern dort nur das Password zu erzeugen und dies nach Beenden des Reports per Funktion zu holen und in die REC-Variable einzutragen?
9. Januar 2008 14:42
9. Januar 2008 15:18