HTTPOut("<p>Temperature: " + Temperature + "</p>")
HTTPOut("<p><h2> Links:</h2></p>")
HTTPOut("<p><a href="+ CHR(34) +"monitor.html"+ CHR(34)+">Monitor</a></p>")
HTTPOut("</body>")
HTTPOut("</html>")
WebPageEnd
'Monitor Web Page
WebPageBegin("monitor.html",Commands)
HTTPOut("<html>")
HTTPOut("<style>body {background-color: oldlace}</style>")
HTTPOut("<body>")
HTTPOut("<title>Monitor CR1000 Datalogger Tables</title>")
HTTPOut("<p><h2>CR1000 Data Table Links</h2></p>")
HTTPOut("<p><a href="+ CHR(34) + "command=TableDisplay&table=CRTemp&records=10" + _
CHR(34)+">Display Last 10 Records from DataTable CR1Temp</a></p>")
HTTPOut("<p><a href="+ CHR(34) + "command=NewestRecord&table=CRTemp"+ CHR(34) + _
">Current Record from CRTemp Table</a></p>")
HTTPOut("<p><a href="+ CHR(34) + "command=NewestRecord&table=Public"+ CHR(34) + _
">Current Record from Public Table</a></p>")
HTTPOut("<p><a href="+ CHR(34) + "command=NewestRecord&table=Status" + CHR(34) + _
">Current Record from Status Table</a></p>")
HTTPOut("<br><p><a href="+ CHR(34) +"default.html"+ CHR(34) + ">Back to the Home Page _
</a></p>")
HTTPOut("</body>")
HTTPOut("</html>")
WebPageEnd
BeginProg
Scan(1,Sec,3,0)
PanelTemp(RefTemp,250)
RealTime(Time())
Minutes = FormatFloat(Time(5),"%02.0f")
Seconds = FormatFloat(Time(6),"%02.0f")
Temperature = FormatFloat(RefTemp, "%02.02f")
CallTable(CRTemp)
NextScan
7.9.21.4 FTP Server
The CR1000 automatically runs an FTP server. This allows Windows
®
Explorer
®
to access the CR1000 file system with FTP, with drives on the CR1000 being
mapped into directories or folders. The root directory on the CR1000 can be any
drive, but the USR: drive is usually preferred. USR: is a drive created by
allocating memory in the USR: Drive Size box on the Deployment | Advanced
tab of the CR1000 service in DevConfig. Files can be copied / pasted between
drives. Files can be deleted through FTP.
7.9.21.5 FTP Client
The CR1000 can act as an FTP client to send a file or get a file from an FTP
server, such as another datalogger or web camera. This is done using the
CRBasic FTPClient() instruction. Refer to a manual for a Campbell Scientific
network link (see the appendix Network Links
(p. 652) ), available at
www.campbellsci.com, or CRBasic Editor Help for details and sample programs.
294