Hallöchen ihr lieben
Mein erster Post in diesem netten und vor allem hilfreichen Forum
Tatsächlich könnte ich ein wenig Hilfe gebrauchen...
Ich schreibe derzeit an einem Programm, welches im Endeffekt die Nachbildung einer Website wird, von einem Projekt, welches ich als Supporter betreut habe...
Ich lese mit diesem Programm Daten der Website aus, stelle sie in verschiedener Form in meinem Programm dar, verändere sie über Editfelder und schicke sie per idHTTP.Post wieder ab....
Die richtigen Daten abzurufen und darzustellen war soweit nicht das große Problem...
Momentan hängt es eher an der Speicherung der Daten!
Delphi-Quellcode:
procedure TForm2.Button9Click(Sender: TObject);
var
saveallydata:TStringList;
s:
string;
tsadress,tspw:
string;
begin
saveallydata := TStringList.Create;
try
tsadress:= edit3.Text;
tspw:= edit4.Text;
saveallydata.Values['
speichern'] :=
'
selecttsversion=TS3&tsserver='+tsadress+'
tspw='+tspw+'
ansprechpartner=xxx+xxxxx+xx+xxx%3A +xxxxxxxxxxx%40xxxxxxxxxx&ansprechpartner2=&allianzname=xxxxx+xxx+xxxx&allianztext=&speichern=Speichern%2Fsave+';
try
s:=idHTTP1.post('
http://xxx/xxx/xxx.php',saveallydata);
Memo2.Lines.Add(s);
//nur zu Debugzwecken
except
on E:
Exception do
ShowMessage('
Fehler: ' + E.
Message);
end;
finally
saveallydata.Free;
end;
end;
Das ist der Code, der nicht so recht funktionieren mag.
Ich hab mir mal erlaubt, zwecks Anonymität einiger Personen (da war ne MSN Adresse samt vollem Namen enthalten^^) die daten geringfügig zu verändern... Hoffe, dass es der Problemlösung keinen Abbruch tut
Bevor jemand fragt^^ Nein, es gibt keine Fehlermeldung, das Programm tut alles was es sonst soll, außer das es die Postdaten falsch überträgt....
Falls es Hilfreich ist.... Zeichen wie "=" und "&" werden in lustige Gebilde a'la "%3D" und "%26" umgewandelt, was denke ich, so nicht sinn der Sache sein sollte^^
Hoffe, ihr habt ein wenig Mitgefühl mit einem Neuling
Liebe Grüße und schonmal danke fürs Lesen