")
HTMLDECODE$
Syntax: HTMLDECODE$(s$)
Decode meta characters on string s$ and returns the decoded string. Example:
print htmldecode$("<STRONG>")
HTTPGET$
Syntax: HTTPGET$ hostname$,filename$[,headerarrayname$][,NOHEADER]
Retreives a web page using the HTTP GET method (just like entering an URL in a browser and pressing enter). The results (HTML) are returned in an array named HTTPDATA$. The number of entries in the array is stored in variable HTTPDATACOUNT. HTTPDATA$ also stores the
returning HTTP header information. This header information is separated by an empty entry (representing an empty line or carriage return:chr$(13)) in HTTPDATA$. hostname$ - name of web site host, either an IP address or host name (ie. www.yahoo.com) filename$ - the name of the file to be returned from the host. headerarrayname$ - the name of the array variable holding optional header data to be posted. The array index starts at zero. NOHEADER - optional keyword that specifies that returned header data is not to be stored in httpdata$.
Example:
httpget "www.yahoo.com","/" for j = 1 to httpdatacount
if httpdata$(j) = "" then ok = -1 if ok then print httpdata$(j) next
? "
"
httpget "www.lycos.com","/",NOHEADER for j = 1 to httpdatacount
print httpdata$(j) next
HTTPPOST$
Syntax: HTTPPOST$ hostname$,action$,vararrayname$[,headerarrayname$][,NOHEADER]
Retreives a web page using the HTTP POST method (web forms usually submit data this way). The results (HTML) are returned in an array named HTTPDATA$. The number of entries in the array is stored in variable HTTPDATACOUNT. hostname$ - name of web site host, either an IP address or host name (ie. www.yahoo.com) action$ - this is what is normally specified in the ACTION argument of the FORM tag. varrayname$ - the name of the array variable holding the data to be posted. The data is in name=value format and the array index starts at zero. headerarrayname$ - the name of the array variable holding optional header data to be posted.
NOHEADER - optional keyword that specifies that returned header data is not to be stored in httpdata$.
Example:
httppost "www.mydomain.com","/cal.xnb", "" for j = 1 to httpdatacount
print httpdata$(j) next
SHOWIMAGE
Syntax: SHOWIMAGE (filename$)
Creates a Base64 encoded image inline the HTML. (only works with modern browsers) Example:
SHOWIMAGE ("myimage.jpg")
SENDFILE
Syntax: SENDFILE "filename" [,mimetype] [,header]
Sends a file to the client. See also ECHOFILE Example:
SENDFILE "myfile.jpg","image/jpg","content-disposition: attachment; filename=myfile.jpg"
UPLOADDIROVERRIDE
Syntax: UPLOADDIROVERRIDE ("Folder")
Overrides the default uploaddir settings and sends the uploaded file to the folder specified. If the folder does not exist, it will be created automatically.
Example:
UPLOADDIROVERRIDE("c:\tmp")
SOCKETS
OPENSOCKET / CLOSESOCKET / READSOCKET / WRITESOCKET
commands provide basic support for handling socket connections. Example:
s = opensocket("127.0.0.1",4120)
ret = writesocket(s,"This is a test message!") if ret >= 0 then
ret = readsocket(s) ' data is returned in variable socketdata$ print "socketdata$: ";Socketdata$;"
"
else
print "connection failure" end if
closesocket s
Miscellaneous Commands
DATA / READ / RESTORE
ENCODE$ / DECODE$
END
ENVIRON$
ERASE
$INCLUDE
LBOUND / UBOUND
RANDOMIZE
REM
SHELL$
SLEEP
SPLIT
SWAP
COLON ':'
DATA / READ / RESTORE
Syntax:
DATA var [,var] READ var [,var] RESTORE
DATA stores Static Data anywhere in the Program.
READ reads Static Data from the DATA statements in the program.
RESTORE resets pointer to the first DATA element of the first DATA statement in the program. Example:
'READ string DATA constants in nested loop with RESTORE DIM y, x AS INTEGER
FOR y = 1 TO 2 'data will be printed twice FOR x = 1 TO 5
READ word$ 'input data PRINT x, word$; "
" NEXT x
PRINT : RESTORE 'allow data to be repeated NEXT y
DATA "table", "chair", "book", "desk", "paper" END
ENCODE$ / DECODE$
Syntax:
enc$ = ENCODE$(algorithm$, text$ [,key$]) dec$ = DECODE$(algorithm$, text$ [,key$])
Enables you to ENCODE / DECODE a string.
Encryption and decryption and provided through AES and 3DES. Encrypthion only (hashing) is provided through md5 or SHA1.
Example:
AESenc$ = encode$("aes","ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890abc","key")
AESdec$ = decode$("aes",AESenc$,"key")
3DESenc$ = encode$("3des","ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890abc","key")
3DESdec$ = decode$("3des",3DESenc$,"key")
MD5enc$ = encode$("md5","ABCDEFGHIJKLabcdefghijkl1234567") SHA1enc$ = encode$("sha1","ABCDEFGHIJKLabcdefghijkl1234567")
END
Syntax: END
END stops execution of the program. Execution also stops without END after the last line of code is executed.
Example:
if s$ = "STOP" then end
ENVIRON$
Syntax: value$ = environ$(name$)
Returns the value of environment variable name$ as a string. Example:
print environ$("PATH")
ERASE
Syntax: ERASE array
Clears a dimensioned array. Example:
dim a$(2) a$(1) = "no1"
a$(2) = "no2" erase a$
print a$(1);a$(2)
$INCLUDE:
Syntax: $INCLUDE: "filename"
Include a file into the source code. The xonoBASIC file is merged into the source code. Example:
REM My program
$INCLUDE: "common.xnb" print "Hello World"
LBOUND / UBOUND:
Syntax: x = LBOUND(array) / x = UBOUND(array)
LBOUND gets the first index of an array. UBOUND gets the last index of an array. Example:
dim a(10)
for i = LBOUND(a) to UBOUND(a) print a(i)
next i
RANDOMIZE
Syntax: randomize seed
Seed the random function (RND) with a new seed. Example:
randomize 100
REM
Syntax: REM followed by anything or nothing
A remark or comment starts on a new line and continues until the next line. You may also use a single quote for a remark.
Example:
REM This is a comment ' And so is this.
SHELL$
Syntax: var$ = SHELL$(cmd$)
Shell executes an external program using the operating system shell. Output is stored in var$.
Example:
print "Results follow:" sh$ = SHELL$("dir")
print sh$ print ""
SLEEP
Syntax: SLEEP n
Suspends execution of program for n milliseconds. NOTE: You normally don't want to slow down CGI programs, use wisely.
Example:
sleep 1
SPLIT
Syntax: # = SPLIT(data$, varname$[,delimiter$])
Split breaks a standard delimited string into pieces. It assigns a variable named varname$ the delimited data in data$. Each field of data$ is assigned to variable varname$ as an array with field 1 assigned to index 1, field 2 to index 2, etc. Index 0 is set to data$. The delimiter for the data is the comma, unless delimiter$ is passed. Delimiter$ may be more than one character. In that case, the field delimiter is one of the characters in delimiter$. The function returns the number of fields in data$.
Example:
REM Read comma delimited file test.csv and print data open "test.csv" for input as #1
if err <> 0 then
print "File test.csv is missing" end ' bail out
end if
20 line input #1, a$
print "==================================================
"
n=split(a$,"b",",") for j = 1 to n
print j,b$(j),"
" next
if eof(1) = 0 then goto 20 close
SWAP
Syntax: SWAP variable1, variable2
SWAP exchanges the values of variable1 and variable2. Since a variable contains both string and numeric values, both types of information is exchanged.
Example:
a=1 b=2
swap a,b
print a,b ' 2,1 swap a,b
print a,b ' 1,2
REM Note that a$,b$ is the same as a,b swap a$,b$
print a$,b$ ' 2,1 for j = 1 to 10
swap varray(j), varray(j+1) next
: (COLON)
Syntax: instruction : instructions
Use the : to line up instructions. Example:
print "hello" : print "world"