Mở 01 File Word Trong 01 Thư Mục Từ Access

Offline Hà Nội 2014 tại Đồ Sơn-Hải Phòng
Chương trình từ thiện năm 2014 tại xã Tân Mỹ, huyện Trà Ôn, tỉnh Vĩnh Long




kết quả từ 1 tới 10 trên 10
6,330 lượt xem
  1. Thành viên cấp trung Hình đại diện của ketoantructuyen
    Tham gia ngày
    Jul 2005
    Địa chỉ
    Qui Nhon City
    Tuổi
    33
    Bài gửi
    8
    Post Thanks / Like
    ketoantructuyen vẫn chưa có mặt trong diễn đàn
    05-08-2006, 11:24 #1
    Chào các anh chị!
    Mình làm kế toán nhưng rất thích viết chương trình. Hiện nay có rất nhiều văn bản mới ra và vb cũ. Mình chứa tất cả các VB đó vào 01 thư mục "VBLuat". Mình đã đánh "mã số vb" rồi.

    Mình muốn dùng Access để mở bất kỳ VB nào trong thư mục khi chúng ta nhập thông số cho nó là " Mã số vb".

    Mình không biết đoạn code để cho access hiểu được đối tượng cần mở là VB worrd có mã số định sẵn. Mình đã thử đủ cách nhưng không được.
    Kiến thức lập trình của mình có giới hạn nên anh chị cố giúp em.
    Mong nhận được câu trả lời sớm nhất.
    Hậu tạ sau
    Chúc anh chị cuối tuần vui vẻ

    Xem thêm các bài viết mới nhất trong cùng chuyên mục này:


  2. Khu vực quảng cáo
    Tham gia ngày
    Always
    Địa chỉ
    Advertising world
    Tuổi
    2010
    Bài gửi
    Many

     

  3. Thành viên cấp trung Hình đại diện của phanxuanthuong
    Tham gia ngày
    Nov 2005
    Địa chỉ
    Viet Nam
    Tuổi
    43
    Bài gửi
    10
    Post Thanks / Like
    phanxuanthuong vẫn chưa có mặt trong diễn đàn
    Cái này thì rất giản đơn. Tui cũng đã thử làm rồi, kết quả rất cool. Không cần phải làm code kiết gì cả trong phần table bạn tạo trường có kiểu là Hyperlink la OK thui. Tui đính kèm ảnh đây.

    Mở 01 File Word Trong 01 Thư Mục Từ Access

    Nếu cần chương trình này thì cho địa chỉ mail đi tui send cho. Nhưng nói trước là bạn tự cập nhận văn bản nhé, vì cái này làm mất thời gian lắm! Vả lại văn bản tui chỉ mới cập nhật được mới hai mươi mấy ngàn thui!
    thay đổi nội dung bởi: phanxuanthuong, ngày 07-08-2006 lúc 09:40

  4. Thành viên cấp trung Hình đại diện của ketoantructuyen
    Tham gia ngày
    Jul 2005
    Địa chỉ
    Qui Nhon City
    Tuổi
    33
    Bài gửi
    8
    Post Thanks / Like
    ketoantructuyen vẫn chưa có mặt trong diễn đàn
    Chào bạn nguyenxuanthuong!
    Cách này thì mình biết nhưng mỗi lần mình di dời thư mục, hoặc chép qua máy khác thì phải đặt lại đường dẫn cho từng loại văn bản.
    Mình muốn phải thật linh động để di dời thư mục.
    Cảm ơn sự góp ý của bạn
    Bạn cố gắn giúp mình thêm nhé

    Chúc bạn vui.

  5. Thành viên cấp trung Hình đại diện của phanxuanthuong
    Tham gia ngày
    Nov 2005
    Địa chỉ
    Viet Nam
    Tuổi
    43
    Bài gửi
    10
    Post Thanks / Like
    phanxuanthuong vẫn chưa có mặt trong diễn đàn
    Nếu không muốn thế thì bạn đặt 1 cái link động đi. Nhưng đây chỉ mới mà ý tưởng tui chưa thử nhưng tui nghĩ là sẽ ỗn đấy.
    Cách thức như sau:
    1. Table 1: Chứa link động, cái này khi bạn sửa thư mục hay đường dẩn gì gì đó sẽ được lưu trong đây.
    2. Table 2: Chỉ chứa ten file word trong thư mục của bạn
    3. 1 Cái query để kết hợp 2 table trên cụ thể Link=linkdong&ten file

    Ý của bro thế nào? Quá tuyệt luôn là đằng khác!!!
    thay đổi nội dung bởi: phanxuanthuong, ngày 07-08-2006 lúc 13:50

  6. Moderator Hình đại diện của Đào Việt Cường
    Tham gia ngày
    Nov 2005
    Địa chỉ
    Khánh Hòa
    Bài gửi
    400
    Post Thanks / Like
    Đào Việt Cường vẫn chưa có mặt trong diễn đàn
    Trích nguyên văn Nguyên văn bởi ketoantructuyen
    mỗi lần mình di dời thư mục, hoặc chép qua máy khác thì phải đặt lại đường dẫn cho từng loại văn bản.
    Mình muốn phải thật linh động để di dời thư mục.
    Dear all,
    -------
    Nếu tạo một ứng dụng quản lý tập tin dạng đơn giản thì chúng ta có thể ứng dụng Hyperlinks.
    Nếu ứng dụng ở mức độ chuyên nghiệp hơn bạn có thể phải xây dựng một thủ tục xử lý đường dẫn và tập tin.
    Trong mọi trường hợp bạn phải nắm quyền kiểm soát và điều khiển chương trình để không phát sinh lỗi khi đường dẫn đã bị thay đổi. Việc thiết lập lại đường dẫn khi các thư mục và tập tên tập tin bị thay đổi là bắt buộc, nhưng theo tôi lên trao quyền cho người sử dụng làm điều này thông qua hộp thoại Open Dialog. Đoạn code dưới đây minh họa việc sử dụng ba "Filers" chuyên dụng: FileSearch, FoundFiles, FileDialog.
    Lưu ý: Để sử dụng được các Object này, các bạn phải tham chiếu thư viện Micosoft Office xx.0 Object Library
    Public Function DirFiles(Optional strPath As String, Optional strFileName As String = "*.*") As String
    If strPath = "" Then strPath = CurrentProject.Path
    Dim i As Long, fs As FileSearch
    Set fs = Application.FileSearch
    With fs
    .LookIn = strPath
    .FileName = strFileName
    If .Execute(SortBy:=msoSortbyFileName, _
    SortOrder:=msoSortOrderAscending) > 0 Then
    Debug.Print "There were " & .FoundFiles.Count & _
    " file(s) found in folder '" & strPath & "':"
    For i = 1 To .FoundFiles.Count
    strFileName = .FoundFiles(i)
    strFileName = Right(strFileName, Len(strFileName) - InStrRev(strFileName, "\"))
    DirFiles = DirFiles & strFileName & ","
    Next i
    DirFiles = Left(DirFiles, Len(DirFiles) - 1)
    Else
    Debug.Print "There were no files found."
    End If
    End With
    End Function

    '_________________________________________________ _

    Public Function File_Select() As String
    On Error Resume Next
    Dim dlgOpen As FileDialog, strFileName As String
    Set dlgOpen = Application.FileDialog(msoFileDialogOpen)
    With dlgOpen
    .AllowMultiSelect = True
    .Show
    End With
    Dim i As Long
    For i = 1 To dlgOpen.SelectedItems.Count
    strFileName = dlgOpen.SelectedItems(i)
    strFileName = Right(strFileName, Len(strFileName) - InStrRev(strFileName, "\"))
    File_Select = File_Select & strFileName & ","
    Next
    File_Select = Left(File_Select, Len(File_Select) - 1)
    Debug.Print File_Select
    End Function
    thay đổi nội dung bởi: Đào Việt Cường, ngày 08-08-2006 lúc 10:12
    Always careful - Always successful

  7. Thành viên cấp trung Hình đại diện của ketoantructuyen
    Tham gia ngày
    Jul 2005
    Địa chỉ
    Qui Nhon City
    Tuổi
    33
    Bài gửi
    8
    Post Thanks / Like
    ketoantructuyen vẫn chưa có mặt trong diễn đàn
    Chào Anh Cường!
    Mình đã thử phân của anh rồi. 02 Hàm này đã chạy tốt. Nhưng mình còn 02 vấn đề chưa thực hiện được:
    01. Mã số VB mình nhập vào từ Combobox hàm DirFile không nhận được. Không hiểu kiểu dữ liệu có vấn đề gì không. Mình đã định dạng theo "text" hết rồi.
    02. Sau khi tìm được File trong thư mục mình chỉ định rồi mình dùng phương thức (method) gì để mở file vừa tìm được.

    Mong Anh Cường giúp đỡ.
    Thank You!

  8. Thành viên cấp trung Hình đại diện của lautyty
    Tham gia ngày
    Sep 2006
    Địa chỉ
    AGNISTANG
    Tuổi
    36
    Bài gửi
    9
    Post Thanks / Like
    lautyty vẫn chưa có mặt trong diễn đàn
    mình cũng như bạn ketoan tructuyen, chưa biêt phương thức nào để lấy về form file theo chỉ định (đã áp dụng 2 phương thức trên).Bạn nào biết chỉ giúp với

  9. TV đang tích cực Hình đại diện của win100
    Tham gia ngày
    Aug 2006
    Địa chỉ
    Gara moto
    Bài gửi
    85
    Post Thanks / Like
    win100 vẫn chưa có mặt trong diễn đàn
    Bạn vào thư viện copy file "tổng hợp văn bản" chạy bằng Access về máy giải nén, trên đó bạn có thể thêm bớt các văn bản của mình vào đó. Tui thấy cái này rất hay.
    Chúc bạn thành công!
    Không bao giờ thích ký, nhưng vẫn cứ phải ký

  10. Thành viên cấp trung Hình đại diện của luckytranquan
    Tham gia ngày
    May 2005
    Địa chỉ
    HCM
    Tuổi
    33
    Bài gửi
    31
    Post Thanks / Like
    luckytranquan vẫn chưa có mặt trong diễn đàn
    Trích nguyên văn Nguyên văn bởi win100 Xem bài
    Bạn vào thư viện copy file "tổng hợp văn bản" chạy bằng Access về máy giải nén, trên đó bạn có thể thêm bớt các văn bản của mình vào đó. Tui thấy cái này rất hay.
    Chúc bạn thành công!
    Chào bạn!
    Mình cũng rất quan tâm đến vấn dề này, mình đã open file bạn nói trên thu viện, đã chạy thu, thay hay. Bạn có thể cho mình Passworld để sua lai một tý cho phù hop voi nhu cau quan lý vb của mình.
    Mong bạn giúp đo.

  11. Thành viên Hình đại diện của chienmak5
    Tham gia ngày
    Jun 2011
    Địa chỉ
    Ha Noi
    Tuổi
    34
    Bài gửi
    1
    Post Thanks / Like
    chienmak5 vẫn chưa có mặt trong diễn đàn
    Rất mong chương trình tiếp tục nâng cấp

    Rất mong bạn cho mình đường link đc k, mình mới vào,

    có thể chia sẻ cho mình đc k? Mình đang rất cần. Mình không tìm thấy trong thư viện file Tổng hợp văn bản bằng Access
    thay đổi nội dung bởi: chienmak5, ngày 09-08-2011 lúc 16:47


Thread Information

Users Browsing this Thread

Hiện tại có 1 người đang truy cập đề tài này gồm: (0 thành viên và 1 khách)

Visitors found this page by searching for:

tạo link trong access

chen file word vao access

cách gọi file word từ accesss

tao hyperlink tren access

Code mo 1 file excel trong access

mo file trong access

cách lưu thư mục trong acess