5. August 2011 07:33
5. August 2011 08:28
Name   DataType   Subtype   Length
mxh   Automation   'Microsoft XML, v4.0'.XMLHTTP40   
mbt   BigText      
is   InStream      
os   OutStream      
l_file   File      
var   Variant      
CREATE(mxh);
mxh.open('GET','http://www.url.de/text.txt',FALSE);
mxh.send("var");
"var" := mxh.responseStream;
is := "var";
mbt.READ(is);
l_file.CREATE( 'c:\temp.txt');
l_file.CREATEOUTSTREAM( os );
mbt.WRITE(os);
l_file.CLOSE;
5. August 2011 08:42
 
			
		29. Mai 2013 10:54
    mxh   Automation   'Microsoft XML, v4.0'.XMLHTTP40   
    mbt   BigText      
    is   InStream      
    os   OutStream      
    l_file   File      
    var   Variant      
    CREATE(mxh);
    mxh.open('GET','http://www.url.de/text.txt',FALSE);
    mxh.send("var");
    "var" := mxh.responseStream;
    is := "var";
    mbt.READ(is);
    l_file.CREATE( 'c:\temp.txt');
    l_file.CREATEOUTSTREAM( os );
    mbt.WRITE(os);
    l_file.CLOSE; 
			
		29. Mai 2013 11:08
29. Mai 2013 11:21
