my test

hai pals

vb Code:

Private Sub cmdProcess_Click()
Dim Free1 As Integer
Dim strData As String
 
If FileLen(App.Path & "\temp.file") > 0 Then Kill App.Path & "\temp.file"
If FileLen(App.Path & "\temp2.file") > 0 Then Kill App.Path & "\temp2.file"
 
Free1 = FreeFile
Open App.Path & "\temp.file" For Output As #Free1