Useful JS Libraries

Graphs

WebGL

Directories

  • Jquery File Tree – https://www.abeautifulsite.net/jquery-file-tree
    dim noExt, noExtResult
    ' ASP remove file extension
    noExt = InStrRev(i__Name, ".", -1, 1)
    If ( noExt > 0 ) then
    noExtResult = Mid(i__Name, 1, noExt - 1)
    End If
    i__Ext = LCase(Mid(i__Name, InStrRev(i__Name, ".", -1, 1) + 1)) 
    Html = Html + "<li class=""file ext_"&i__Ext&""">"&_
    "<a href=""#"" rel="""+(BaseFileDir+i__Name)+""">"&_
    (noExtResult)+"</a></li>"&VBCRLF
    

Leave a comment

Your email address will not be published. Required fields are marked *

13 + two =