Can anyone help,
Thanks to a previous request for help the following code successfully writes an index.html file to the correct folder on our servers. But how do I get the same file to be uploaded to an external server via the customers FTP Account?
Current Working Code:
|;
{
&html_record_long(&get_record($in{$db_key}))
}
{
mkdir("$rec{'CustomerID'}",0755) ;
open(HTM, ">$rec{'CustomerID'}/index.htm");
select(HTM);
print qq| <HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">
<META NAME="description" CONTENT="$rec{'Description'}">
<META NAME="keywords" CONTENT="$rec{'Keywords'}">
<TITLE>$rec{'Title'}</TITLE>
</HEAD>
<FRAMESET ROWS="100%" border="0">
Thanks to a previous request for help the following code successfully writes an index.html file to the correct folder on our servers. But how do I get the same file to be uploaded to an external server via the customers FTP Account?
Current Working Code:
|;
{
&html_record_long(&get_record($in{$db_key}))
}
{
mkdir("$rec{'CustomerID'}",0755) ;
open(HTM, ">$rec{'CustomerID'}/index.htm");
select(HTM);
print qq| <HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">
<META NAME="description" CONTENT="$rec{'Description'}">
<META NAME="keywords" CONTENT="$rec{'Keywords'}">
<TITLE>$rec{'Title'}</TITLE>
</HEAD>
<FRAMESET ROWS="100%" border="0">
<FRAME NAME="main" SRC="$rec{'URL'}" MARGINHEIGHT=0 MAGRGINWIDTH=0 SCROLLING=AUTO NORESIZE>
<FRAMESET COLS="100%">
</FRAMESET>
</FRAMESET>
</html>
|;
close(HTM);
