URLEncode/URLDecode Example

Keywords:  URLEncode  URLDecode	 

---

;**************************************************************************
;	     URLEncode/URLDecode DEMONSTRATOR
;
; This sample app will urlencode & urldecode a string you give it.
;
; Run this file from WinBatch, optionally with 2 params:
;     URLEncode.WBT
;
;
; Author: Jennifer Palonus (GDI)
; 
;  Date	   Major changes
; -------  ----------------------------------------------------------------
; 08apr96  Cloned from WILScanForm.wbt.
; 08apr96  
;**************************************************************************
sTitle = "URLEncoding/Decoding"


AddExtender ("wwwsk34I.dll")


sPlain = ""

while (@TRUE)
	sPlain = AskLine (sTitle, "Enter the plain string:", sPlain)
	sEncoded = URLEncode (sPlain)

	sMsg = strcat ("Original string:   ", sPlain, @CRLF, "urlencoded string: ", sEncoded)
	Message (sTitle, sMsg)
	
	sEncoded = AskLine (sTitle, "Enter the encoded string:", sEncoded)
	sPlain = URLDecode (sEncoded)

	sMsg = strcat ("Encoded string: ", sEncoded, @CRLF, "Plain string:   ", sPlain)
	Message (sTitle, sMsg)
endwhile

---

Article ID:   W12640

Filename:   URLEncode and URLDecode Example.txt