|
xxx
Utility Belt:
FielWrite (from string) Demo
by Charles Carroll
The code below calls "Utility Belt" functions.
The FileWrite (from string) is one demo of Database "Utility Belt" functionality.
filename=/experiments/utilitybelt/vercurrent/ubdemo_filewrite_string.aspx
<%@ debug="true" %>
<%@ Assembly src="utilitybelt.vb" %>
<%@ import namespace="system.environment"%>
<script language="VB" runat="server">
dim ub1 as new learnasp.utilitybelt()
Sub Page_Load(S As Object, E As EventArgs)
ub1.Options("Debug-on,Xray-To-page-On")
DIM strTest as string
strTest="Line 1" & newline & "line 2" & newline & "line 3"
dim strFileName as string=request.PhysicalApplicationPath() & "data\test.txt"
ub1.FileWrite(strFileName,strTest)
ub1.Xray(ub1.FileRead(strFileName),"Contents of File named <b>" & strFileName & "</b><br>we Just Wrote to Disk<br>")
End Sub
</script>
<html><head>
<title>Utility Belt Demo</title></head>
<body bgcolor="#FFFFFF">
<form runat="server"></form>
</body></html>
 |  |  |
|
There are many worthy charities!!. But perhaps help starving children in Africa or South America AND help Charles too.
a $5 tip buys him lunch at McDonalds,
a $20 tip buys his kid Hitoshi a new computer game,
a $39 tip buys his daughter Michiko a few nice outfits.
See our donor list.
| |
 | |  |
|
|
|
|