PDA

View Full Version : Dynamisches HttpTransfer Object



Ralf
22-May-2015, 04:47 AM
Hallo,

Ich habe einen HttpTransfer der dynamisch erzeugt werden soll, statisch sieht das bisher so aus:


Object oHttpTransfer is a cHttpTransfer

Property String psReceivedData
Set psRemoteHost to 'sandbox.atalogics.com'
Set peTransferFlags to ifSecure // <<- wenn HTTPS
Set piRemotePort to rpHttpSSL

Procedure OnDataReceived String sContentType String sData
Forward Send OnDataReceived sContentType sData
Set psReceivedData to sData
End_Procedure

End_Object



Ich komme da mit er Hilfe nicht zurecht

kann mir ausserdem mal jemand mitteilen wie man hier Text einrückt.

Ralf

GhostShotIV
22-May-2015, 05:52 AM
Deine 2. Frage lässt sich schon mal leicht beantworten.

Dafür gibt es die "CODE" Tags (# Zeichen, wenn man im Advanced Modus ist in der Toolbar).

Im Text selbst sieht dieser dann so aus:
[ CODE ]....[ /CODE ] (ohne die Leerzeichen)
Der Text innerhalb dieser beiden Tags behält seine führenden Leerzeichen in Zeilen und kann somit eingerückt werden.

Die Antwort auf die eigentliche Frage ist:


Class cMeinHttpTransfer is a cHttpTransfer
Procedure Construct_Object
Forward Send Construct_Object
//Alternativ
Set psRemoteHost to "sandbox.atalogics.com"
Set piRemotePort to ifSecure
End_Procedure

Procedure OnDataReceived String sContentType String sData
Forward Send OnDataReceived sContentType sData
Set psReceivedData to sData
End_Procedure
End_Class
Procedure ObjektErzeugen
Handle hoObjekt
Get Create (RefClass(cMeinHttpTransfer)) to hoObjekt
//Alternativ
Set psRemoteHost of hoObjekt to "sandbox.atalogics.com"
Set piRemotePort of hoObjekt to ifSecure
End_Procedure


psRemoteHost und piRemotePort können entweder in dem Handle Objekt gesetzt werden, oder in der eigenen Klasse.
Das Interface "OnDataReceived" kann man für dynamische Objekte nur verarbeiten, wenn man eine eigene Klasse erzeugt und in dieser dass ganze verarbeitet, da man Prozeduren in dynamischen Objekten nicht ändern kann.

Ralf
26-May-2015, 06:33 AM
Hallo GhostShot

Es ging auch darum dieses Objekt nach dem Gebrauch zu löschen. Das funktioniert jetzt alles wie geplant

besten Dank.

Ralf