Thay đổi đường dẫn lưu file text

[haihs105]

Em tìm trên mạng có đoạn code :
Sub writeFileExample2()
Dim fileName As String
Dim content As String

content = "Hello, Admin!" & vbCrLf & "Write data to text file example."

fileName = Application.ActiveWorkbook.Path & "\" & "ouput.txt"

' open file as output
Open fileName For Output As #1
' write content to file
Write #1, content
' close file
Close #1
End Sub
Nó mặc định là ở destop, bây giờ em muốn lưu ở ổ đĩa khác thì dùng hàm gì vậy. Em mới học ^^

 

[VetMini]

...
content = "Hello, Admin!" & vbCrLf & "Write data to text file example."
fileName= "Ổ đĩa khác"
fileName = fileName & "\" & "ouput.txt"
...

 

[haihs105]

Mình muốn lưu vào ổ đĩa C thì nó báo vậy, có cách khắc phục được không bạn VetMini

 

[VetMini]

Bó tay với sự chủ quan của bạn. Có thấy code đâu mà khắc với phục.
Tôi đâu có phải là thầy pháp mà có thể khắc phục ma quỉ, những cái mà mình không thấy.

 

[haihs105]

Bó tay với sự chủ quan của bạn. Có thấy code đâu mà khắc với phục.
Tôi đâu có phải là thầy pháp mà có thể khắc phục ma quỉ, những cái mà mình không thấy.

Sub writeFileExample2()
Dim fileName As String
Dim content As String

content = "Hello, Admin!" & vbCrLf & "Write data to text file example."
fileName = "E:"
fileName = fileName & "\" & "ouput.txt"

' open file as output
Open fileName For Output As #1
' write content to file
Write #1, content
' close file
Close #1
End Sub
mình muốn lưu ở ổ C: nhưng báo lỗi không cho ghi vào đó, ổ khác thì được.

 

[ndu96081631]

Sub writeFileExample2()
Dim fileName As String
Dim content As String

content = "Hello, Admin!" & vbCrLf & "Write data to text file example."
fileName = "E:"
fileName = fileName & "\" & "ouput.txt"

' open file as output
Open fileName For Output As #1
' write content to file
Write #1, content
' close file
Close #1
End Sub
mình muốn lưu ở ổ C: nhưng báo lỗi không cho ghi vào đó, ổ khác thì được.

Vì Windows có cơ chế bảo vệ cấm ghi dữ liệu vào ổ chứa hệ điều hành, ngoại trừ một vài chỗ như Desktop, Documents. Đương nhiên phải chơi "khó" vậy chứ nếu không virus nó muốn vô thì vô, muốn ra thì ra rồi... chết luôn à
Thật ra là vẫn có cách ghi được nhưng mà... khó. Vậy giải pháp đơn giản là tạo thư mục con bên trong những thư mục mà Windows cho phép rồi ghi file vào