Andreas,
It's not entirely clear what you want (submitting some code would probably
be a good idea)... but I'll take a chance anyway:
function PostNewPHPscript(Dir_Name : string): boolean;
var PHPcode, URLData : string; ss : TStringStream;
begin
PHPcode := '<?php'#13#10 +
'$currentdir=getcwd();'#13#10 +
'$dir = $currentdir . "/" . $_POST[''new_dir''];'#13#10 +
'mkdir($dir, 0755);'#13#10 +
'?>';
URLData := StringReplace(PHPcode, 'new_dir', Dir_Name, [rfReplaceAll,
rfIgnoreCase]);
ss := TStringStream.Create('');
try
result := HTTPpostURL('http://www.MyWebsite.com/script.php', URLData,
ss);
finally
ss.free; // Ignoring any possible contents returned in ss
end;
end;
-------------------------------------------------------------------------
This SF.net email is sponsored by the 2008 JavaOne(SM) Conference
Don't miss this year's exciting event. There's still time to save $100.
Use priority code J8TL2D2.
http://ad.doubleclick.net/clk;198757673;13503038;p?http://java.sun.com/javaone
_______________________________________________
synalist-public mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/synalist-public
