Grid Hierarcical
Source code of a Control, subclassing the MSFlexGrid, to create a Hierarcical Grid (like Treeview). But, as in a MSFlexGrid, you can set individual fonts, colors, even pictures on any cell.
AI
Riepilogo AI: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.
Codice sorgente
Upload "counter.asp" <% 'Made by Abhi Malani '[email protected] ' ' 'Copyright Abhi Malani, 2002 'these line must be present in the script Response.Write "<!--Ezcounter by abhi malani, [email protected]>" 'If however you want to remove the lines please contact me. Session.Timeout=5 'Set the Session to expire in 5 mins. If IsEmpty(Session("Count")) Then Call Countthisuser End if Sub CountThisUser() Dim objFSO Dim objFS Dim strFileName Dim intOldCount Dim intNewCount strFileName = Server.MapPath("hits.txt") 'hits.txt file should have write permission Set objFSO = Server.CreateObject("Scripting.FileSystemObject") If objFSO.FileExists(strFileName) Then Set objFS = objFSO.OpenTextFile(strFileName, 1) Else Set objFS = objFSO.CreateTextFile(strFileName, True) End If If Not objFS.AtEndOfStream Then intoldCount = objFS.ReadAll Else intoldCount = 0 End If objFS.Close intNewCount = intOldCount + 1 Session("Count")= intNewCount Set objFS = objFSO.CreateTextFile(strFileName, True) objFS.Write intNewCount objFS.Close Set objFSO = Nothing Set objFS = Nothing End Sub 'Session.Abandon 'Remove the ' to check the script %>
Commenti originali (3)
Recuperato da Wayback Machine