S
Sash
I was hoping o ue a query qryOut as my recordsource for an output file. Is
this possible? Reason being that this query is based on another
query...trying to take the easy way out.
Dim db As Database
Set db = CurrentDb()
Dim rs As Recordset
Set rs = db.OpenRecordset("qryOut")
Close #1
Open "f:/fileout.txt" For Output As #1
Dim stOut As String
stOut = "CH " & Trim$(rs.Fields("AcctNum")) & " " &
Format$(rs.Fields("Date"), "mmddyy")
Print #1, stOut
End Sub
this possible? Reason being that this query is based on another
query...trying to take the easy way out.
Dim db As Database
Set db = CurrentDb()
Dim rs As Recordset
Set rs = db.OpenRecordset("qryOut")
Close #1
Open "f:/fileout.txt" For Output As #1
Dim stOut As String
stOut = "CH " & Trim$(rs.Fields("AcctNum")) & " " &
Format$(rs.Fields("Date"), "mmddyy")
Print #1, stOut
End Sub