<![CDATA[
<html><head>
<title>Overview</title>
<meta name="generator" content="HelpMaker">
<meta name="keywords" content="Overview">
<link rel="stylesheet" type="text/css" href="hm.css"></head>
<body bgcolor="#FFFCEA">
<table width="100%" border="0" cellspacing="0" cellpadding="2" bgcolor="#C0C0C0">
<tr>
<td align="left">
<div align="left"><font face="Arial" color="#010101" size="4"><span style=" font-size:14pt; font-family:Arial; color:#010101">Overview</span></font></div>
</td>
<td align="right">
<font face="Arial" size="2">
<a href="overview.htm">Top</a> <a href="close.htm">Next</a>
</font>
</td>
</tr></table>
<hr><div align="left"><font face="Times New Roman" color="#010101"><span style=" font-size:12pt; font-family:Times New Roman; color:#010101">Using the FTP library you can connect the device or desktop to a ftp server and download
or upload from it.</span></font></div><div align="left"><font face="Times New Roman" color="#010101"><span style=" font-size:12pt; font-family:Times New Roman; color:#010101">The device / desktop should be connected to the internet.</span></font></div><div align="left"><font face="Times New Roman" color="#010101"><span style=" font-size:12pt; font-family:Times New Roman; color:#010101">Note that connecting to an ftp library when the device is connected to the internet using
Activesync is not recommended and may not work properly.</span></font></div><div align="left"><font face="Times New Roman" color="#010101"><span style=" font-size:12pt; font-family:Times New Roman; color:#010101">Working with this library is pretty simple.</span></font></div><div align="left"><font face="Times New Roman" color="#010101"><span style=" font-size:12pt; font-family:Times New Roman; color:#010101">First add a reference to this library using the Components dialog.</span></font></div><div align="left"><font face="Times New Roman" color="#010101"><span style=" font-size:12pt; font-family:Times New Roman; color:#010101">Add an object of that type using Tools - Add Object.</span></font></div><div align="left"><font face="Times New Roman" color="#010101"><span style=" font-size:12pt; font-family:Times New Roman; color:#010101">Initialize the object with the New1 method.</span></font></div><div align="left"><font face="Times New Roman" color="#010101"><span style=" font-size:12pt; font-family:Times New Roman; color:#010101">Connect to the ftp server with the Open method (include user user name and password if
necessary).</span></font></div><div align="left"><font face="Times New Roman" color="#010101"><span style=" font-size:12pt; font-family:Times New Roman; color:#010101">Upload or download files.</span></font></div><div align="left"><font face="Times New Roman" color="#010101"><span style=" font-size:12pt; font-family:Times New Roman; color:#010101">Close the connection with the Close method. </span></font></div><div align="left"><font face="Times New Roman" color="#010101"><span style=" font-size:12pt; font-family:Times New Roman; color:#010101"><br></span></font></div><div align="left"><font face="Times New Roman" color="#010101"><span style=" font-size:12pt; font-family:Times New Roman; color:#010101">Example:</span></font></div><div align="left"><font face="Times New Roman" color="#010101"><span style=" font-size:12pt; font-family:Times New Roman; color:#010101">This example requires an ftp object named ftp, a table named table1 and a button named
btnDownload.</span></font></div><div align="left"><font face="Times New Roman" color="#010101"><span style=" font-size:12pt; font-family:Times New Roman; color:#010101"><br></span></font></div><div align="left"><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">Sub </span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">Globals</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> </span></font><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">dim </span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">entries(0) </span></font><font face="Courier New" color="#008000" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#008000">'This array will be filled by the GetEntries
method</span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">.</span></font></div><div align="left"><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">End Sub</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"><br></span></font></div><div align="left"><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">Sub </span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">App_Start</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> Form1.Show</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> ftp.New1</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> ftp.Open("ftp.ftpplanet.com","","") </span></font><font face="Courier New" color="#008000" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#008000">'No
user name or password
required here.</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> ftp.SetCurrentDirectory("images")</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> table1.AddCol(cString,"name",60)</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> table1.AddCol(cString,"date",60)</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> table1.AddCol(cNumber,"size",60)</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> FillEntries</span></font></div><div align="left"><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">End Sub</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"><br></span></font></div><div align="left"><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">Sub </span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">FillEntries </span></font><font face="Courier New" color="#008000" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#008000">'Fills the table with the directories and files</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> entries() = ftp.GetEntries("",true) </span></font><font face="Courier New" color="#008000" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#008000">'Get
all subdirectories first.</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> </span></font><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">for </span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">i = 0 </span></font><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">to arraylen</span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">(entries())-1 </span></font><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">step </span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">3 </span></font><font face="Courier New" color="#008000" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#008000">'Each
entry includes 3
values: name, date (ticks) and size.</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> table1.AddRow(entries(i),</span></font><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">date</span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">(entries(i+1)),entries(i+2))</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> </span></font><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">next</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> entries() = ftp.GetEntries("",false) </span></font><font face="Courier New" color="#008000" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#008000">'Get
all files now.</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> </span></font><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">for </span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">i = 0 </span></font><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">to arraylen</span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">(entries())-1 </span></font><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">step </span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">3</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> table1.AddRow(entries(i),</span></font><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">date</span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">(entries(i+1)),entries(i+2))</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> </span></font><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">next</span></font></div><div align="left"><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">End Sub</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"><br></span></font></div><div align="left"><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">Sub </span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">btnDownload_Click</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> </span></font><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">WaitCursor</span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">(true)</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> name = table1.Cell("name",table1.SelectedRow)</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> ftp.GetFile(name,</span></font><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">AppPath</span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> & "\" & name)</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> </span></font><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">WaitCursor</span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">(false)</span></font></div><div align="left"><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">End Sub</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"><br></span></font></div><div align="left"><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">Sub </span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">Form1_Close</span></font></div><div align="left"><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000"> ftp.Close </span></font><font face="Courier New" color="#008000" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#008000">'Close the connection</span></font><font face="Courier New" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#000000">.</span></font></div><div align="left"><font face="Courier New" color="#0000ff" size="2"><span style=" font-size:10pt; font-family:Courier New; color:#0000ff">End Sub</span></font></div>
</body></html>
]]>