Hi und zwar bin ich mal gerade wider was am Proggen.
Es ist an für sih ganz leicht.
Nur jetzt ist die frage, ob ich den PHP Code richtig ausgelesen ahbe.
Ihr kennt vielleicht die Seite Lix.in.
Darüber kann man Links verschlüsseln lassen.
Jetzt will ich ein progrmm schreiben, das via Post nen link an die Seite schickt ihn verschlüsselt und den verschüsselten link wieder ausließt.
Jetzt bin ich mir halt nur nicht sicher ob meine Post daten richtig sind.
Mein Delphi Code:
Delphi-Quellcode:
List := TStringList.Create;
List.Add('
url='+Edit1.Text);
List.Add('
button=Protect Link');
List.Add('
op=crypt_single');
qtxt := idHTTP1.Post('
http://lix.in/index.php',List);
List.Free;
Der PHP Code:
Zitat:
<input type="text" name="
url" size="40" style="font-family: Tahoma; font-size: 8pt" value="">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td valign="top"><input type="submit" value="Protect Link" name="button" style="color: #000000; font-family: Tahoma; font-size: 8pt; border: 1px solid #000000; background-color: #FFFFFF">
<input type="reset" name="reset" value="Clear" style="color: #000000; font-family: Tahoma; font-size: 8pt; border: 1px solid #000000; background-color: #FFFFFF">
<input type="hidden" name="op" value="crypt_single"></td>
<td align="right" style="padding-right: 5px">
<input name="captcha" type="hidden" value="0" /><input type="submit" name="mode" value="Captcha Off" style="color: #000000; font-family: Tahoma; font-size: 8pt; border: 1px solid #000000; background-color: #FFFFFF"> </form>
Ist das so richtig?
Wenn ja, stimmt beim auslesen des verschlüsselten links was nich.