Anthony1312002
Programmer
I'm using the script below to create a text file on my C drive and it's working just fine. But the script needs the ability to create this same file on C drive the PC of who ever the user is. This file is used to keep track of Customer volumes such as the number of Image Items, Correspondence and then bill the customer for those items. Does anyone have an idea of how to do this?
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fs
penTextFile("C:\rmtcoupld\RMTCOCHM.txt", ForWriting, True)
sql_users2 = "SELECT * FROM qrytblUploadFile Order By Lockbox_Nbr,Tran_Code"
Set rs_users2 = conn.Execute(sql_users2)
conn.Execute sql_users2
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fs
sql_users2 = "SELECT * FROM qrytblUploadFile Order By Lockbox_Nbr,Tran_Code"
Set rs_users2 = conn.Execute(sql_users2)
conn.Execute sql_users2