Sub WritePass(ByVal _FilePath As String, ByVal _Pass As String) Try If System.IO.File.Exists(_FilePath) = True Then Dim objWriter As New System.IO.StreamWriter(_FilePath) objWriter.Write(_Pass) objWriter.Close() MsgBox("Text written to file") Else MsgBox("File Does Not Exist") End If Catch ex As Exception End Try End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)