Đánh giá chủ đề:
  • 7 Votes - 4 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Map Network Drive bằng VBA
#1
Hỏi: Mình có làm 1 chương trình file Data để trên mạng LAN, do đó nếu người dùng không map ổ mạng thì sẽ không thể chạy chương trình được. Các bác cho em hỏi có đoạn code nào gọi cửa sổ Map network Drive lên được không?
Đáp:
Điều kiện là thư mục của bạn phải được share trước.
Mã:
Sub MapNetwork(D As String, s As String, UserName As String, Password As String)
    'd : diver
    's: Map Address
    Dim p As String
    p = "net use " & D & ": \\" & s
    Shell p, vbHide
    MsgBox "Map " & D & " successful"
    End Sub


Bây giờ, giả sử dữ liệu mình nằm trên server trong thư mục DuLieu. UserName Mình là Noname. Pass Của mình là TTAC. Mình muốn gán ổ đĩa G làm ổ mạng. mình sẽ gọi Thủ tục map network Drive như sau:

Mã:
MapNetwork "G", "server\dulieu", "Noname", "TTAC"
Chữ ký của Noname 020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Reply
Những người đã cảm ơn haquocquan , dangshine , thquanks , Minh Tiên


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Ms Access VBA và Google drive, một vài ý tưởng trong chia sẻ và đồng bộ số liệu... paulsteigel 46 3,857 07-10-16, 02:43 PM
Bài mới nhất: kieu manh
  Hướng Dẫn Demo Duyệt Web bằng Access maidinhdan 4 764 04-05-16, 10:13 PM
Bài mới nhất: quanghoasla
  [Lỗi] Phần mềm Access format 2003 chạy bằng Access 2010 trên win 7 bị lỗi leminh 0 235 05-01-16, 03:49 PM
Bài mới nhất: leminh
  Cần hướng dẫn viết phần mềm cân xe bằng cân điện tử bangnguyencong 17 4,306 17-10-15, 01:55 PM
Bài mới nhất: nguyenichtri
  [Hỏi] Kết nối dữ liệu bằng internet con_trai_vl 52 15,104 13-08-15, 07:38 PM
Bài mới nhất: rainkv

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ