[size=2][color=#0000ff]Private[/color][/size][size=2] [/size][size=2][color=#0000ff]Sub[/color][/size][size=2] Form1_Closing([/size][size=2][color=#0000ff]ByVal[/color][/size][size=2] sender [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]Object[/color][/size][size=2], [/size][size=2][color=#0000ff]ByVal[/color][/size][size=2] e [/size][size=2][color=#0000ff]As[/color][/size][size=2] System.ComponentModel.CancelEventArgs) [/size][size=2][color=#0000ff]Handles[/color][/size][size=2] [/size][size=2][color=#0000ff]MyBase[/color][/size][size=2].Closing
[/size][size=2][color=#0000ff]If[/color][/size][size=2] clsCommon.Flags.connected = [/size][size=2][color=#0000ff]True[/color][/size][size=2] [/size][size=2][color=#0000ff]Then
[/color][/size][size=2]clsCommon.thisSession.disconnect()
[/size][size=2][color=#0000ff]End[/color][/size][size=2] [/size][size=2][color=#0000ff]If
[/color][/size][size=2][/size][size=2][color=#008000]' Write the log to file
[/color][/size][size=2][/size][size=2][color=#0000ff]Dim[/color][/size][size=2] sr [/size][size=2][color=#0000ff]As[/color][/size][size=2] System.IO.StreamWriter = System.IO.File.CreateText(Application.StartupPath & "\Log.txt")
sr.WriteLine("Beginning of log file - written on " & Now.ToString())
sr.Write(txtDebugBox.Text)
sr.WriteLine("End of log file - written on " & Now.ToString())
sr.Close()
Application.Exit()
[/size][size=2][color=#0000ff]End[/color][/size][size=2] [/size][size=2][color=#0000ff]Sub[/color][/size]
[size=2][color=#0000ff]