Search Tools Links Login


Posted: 2002-06-01
By: ArchiveBot
Viewed: 61

Filed Under:

VB6 Code Cache

No attachments for this post

Dumps a string to a file

Original Author: Ian Ippolito (psc)


strString--string to dump
strFile--file to dump to


Sub Dump_String_To_File (ByVal strString As String, ByVal strFile As String)
  Dim fileFile As Integer
  fileFile = FreeFile
  Open strFile For Output As fileFile
    Write #fileFile, strString
  Close fileFile
  Dim intReturn
  On Error Resume Next
  intReturn = Shell("c:appsutility extpad xtpad16.exe " & strFile, 1)
  On Error GoTo 0
End Sub

Comments on this post

No comments have been added for this post.

You must be logged in to make a comment.