Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Sub OpenWonLost() Dim fName As String fName = gMyPath & "\KenoData.ini" Set clsINIFile = New cInifile With clsINIFile .Path = fName .Section = txtDescription.Text .Key = "TotWonLost" .Default = 0 mcurWonLost = .Value .Key = "TotalRuns" .Default = 0 mlTotalRuns = .Value End With mbNewSession = False End Sub Private Sub txtDescription_Change() SectionExists txtDescription.Text If SectionExists = False Then mlTotalRuns = 0 mcurWonLost = 0 Else OpenWonLost'get the saved values End If End Sub
|Copy a row||12||64|
|How to incorporate an error traping routing to existing code in VB6||11||45|
|How to read File Date Created using VB6||8||52|
|add criteria to query in VB, Access 2003||2||10|