Category Archives: VBasic

ipAddrInt, ipAddrStr in VBscript / VBA / VB6

Function ipAddrInt(ip) Dim a, tmp a = Split(ip, “.”, 4) tmp = a(0) * 16777216# + a(1) * 65536 + a(2) * 256 + a(3) * 1 ipAddrInt = tmp End Function Function ipAddrStr(i) Dim s, tmp s = Right(String(8, … Continue reading

Posted in Uncategorized, VBasic | Tagged , , | Leave a comment

[MXXMLWriter.indent] – use MXXMLWriter and SAXXMLReader to generate a well formated xml file

indent Property [MXXMLWriter]. Sets whether to indent output. When set to True, this property indents output for “pretty printing” to reflect the nesting structure of the document. use MXXMLWriter and SAXXMLReader to generate a well formated xml file Sub indent_xml() … Continue reading

Posted in Code Snippets, VBasic | Tagged , , | Leave a comment

Get flickr photos with Classic ASP & Flickr API

Get flickr photos with Classic ASP & Flickr API. flickr.photosets.getPhotos, to get list photos of a photosets since i store all those screenshots in a photosets flickr.photos.getInfo, to get the detail photo information List of functions: flickrGetUrlPhotosets, setup the “flickr.photosets.getPhotos” … Continue reading

Posted in VBasic | Leave a comment

AJAX, XML, XSLT (and some ASP) tricks: Generate HTML form data in VBscript

Function URLEncoded(V) ‘ private Dim CC,I,Enc Enc = “” For I = 1 To Len(V) CC = AscW(Mid(V,I,1)) If (CC >= 48 And CC < 58) Or (CC >= 64 And CC < 90) Or (CC >= 97 And CC … Continue reading

Posted in Code Snippets, VBasic | Leave a comment

VBscript/ASP Classic Date Format Unix Timestamp

VBscript/ASP Classic Date Format Unix Timestamp.

Posted in Code Snippets, VBasic | Leave a comment

EscapeURL() – VBasic wrapper for encode URL API function

Function EscapeURL(ByVal URL As String) As String – API CALL VBASIC VBASIC API call to encode url Private Declare PtrSafe Function UrlEscape Lib “Shlwapi.dll” Alias “UrlEscapeA” ( _ ByVal pszURL As String, ByVal pszEscaped As String, ByRef pcchEscaped As Long, … Continue reading

Posted in Code Snippets, VBasic | Tagged , , , , , , | 2 Comments