Advertisement
Advertisement
| 07.21.2008 at 02:06PM PDT, ID: 23583418 |
|
[x]
Attachment Details
|
||
1: 2: 3: 4: 5: 6: 7: 8: |
Const SQL_Status As String = "C:\Temp\PVT Maintenance\SQL Statuses\1 - SQL Status.log"
Dim swSQLStatus As StreamWriter = My.Computer.FileSystem.OpenTextFileWriter(SQL_Status, True)
--- CAN'T RUN THIS ROUTINE OUTSIDE OF METHOD BODY PRIOR TO CONSTANT VARIABLE---
Sub FldrExist()
If Directory.Exists("C:\Temp\PVT Maintenance\SQL Statuses") = False Then
Directory.CreateDirectory("C:\Temp\PVT Maintenance\SQL Statuses")
End If
End Sub
|