• Trang chủ click to expand contents 

  • Demo Chèn và hiển thị hình ảnh bằng đường dẫn

  • RE: Demo Chèn và hiển thị hình ảnh bằng đường dẫn

    maidinhdan > 06-07-15, 04:04 PM

    (06-07-15, 10:21 AM)changkhoonline77 Đã viết: Cũng hay nhưng tiếc là link ảnh không động. Tức là thay đổi tên folder hay đường dẫn folder chứa ảnh thì phải link lại, trên 1000 record mà link lại thì...

    Thì bạn dùng hàm Replace để đổi tên. Dù cho 1 triệu Reocord cũng được. Bạn biết tại sao tôi không làm tham chiếu động theo ý bạn hỏi không. Vì như thế bạn sẽ không có nút lệnh chèn tự động. Không lẽ bạn tự đánh tên hình vào.

    Đó là lý do, nếu bạn cần hỗ trợ về hàm replace mình xin giúp đỡ tiếp.

    Thân mến!

  • RE: Demo Chèn và hiển thị hình ảnh bằng đường dẫn

    tronghieu9792 > 06-07-15, 04:07 PM

    bạn maidinhdan thân mến, sao mĩnh tải về chỉ chèn được hìnhđầu tiên sao đó điều báo là hình quá lớn không chèn được nữa.

  • RE: Demo Chèn và hiển thị hình ảnh bằng đường dẫn

    tronghieu9792 > 06-07-15, 04:08 PM

    (06-07-15, 04:07 PM)tronghieu9792 Đã viết: bạn maidinhdan thân mến, sao mĩnh tải về chỉ chèn được hìnhđầu tiên sao đó điều báo là hình quá lớn không chèn được nữa.

  • RE: Demo Chèn và hiển thị hình ảnh bằng đường dẫn

    maidinhdan > 06-07-15, 05:27 PM

    (06-07-15, 04:08 PM)tronghieu9792 Đã viết:
    (06-07-15, 04:07 PM)tronghieu9792 Đã viết: bạn maidinhdan thân mến, sao mĩnh tải về chỉ chèn được hìnhđầu tiên sao đó điều báo là hình quá lớn không chèn được nữa.

    Xem lại bản office đăng chạy ( Hầu hết dùng bản cr@ck trên mạng hay lỗi lắm) kiếm mà xin ai bản trả phí ấy,..nếu cần tôi tặng 1 bản.

    Mình chèn cả chục hình có thấy gì đâu, giả lại đây là Demo tách từ Quản lý nhân sự 1 của mình, chạy gần 5 năm rồi có thấy nó báo cái gì đâu, ( Tốt nhất là sử dụng file *.jpg nhé) về kích thức thì vô tư.

    Thân mến.

  • RE: Demo Chèn và hiển thị hình ảnh bằng đường dẫn

    changkhoonline77 > 06-07-15, 10:57 PM

    (06-07-15, 04:04 PM)maidinhdan Đã viết:
    (06-07-15, 10:21 AM)changkhoonline77 Đã viết: Cũng hay nhưng tiếc là link ảnh không động. Tức là thay đổi tên folder hay đường dẫn folder chứa ảnh thì phải link lại, trên 1000 record mà link lại thì...

    Thì bạn dùng hàm Replace để đổi tên. Dù cho 1 triệu Reocord cũng được. Bạn biết tại sao tôi không làm tham chiếu động theo ý bạn hỏi không. Vì như thế bạn sẽ không có nút lệnh chèn tự động. Không lẽ bạn tự đánh tên hình vào.

    Đó là lý do, nếu bạn cần hỗ trợ về hàm replace mình xin giúp đỡ tiếp.

    Thân mến!

    Mình đã có làm tham chiếu link ảnh rồi. Chỉ lâu lâu nó lỗi chút thôi

    http://thuthuataccess.com/forum/thread-8120.html

  • RE: Demo Chèn và hiển thị hình ảnh bằng đường dẫn

    tranthanhan1962 > 12-07-15, 07:40 AM

    Hi Dân.
    Mấy hôm rồi bị lún chân vào cuộc thi ảnh nghệ thuật của tỉnh mình nên không test được code chèn hình của bạn. Công việc chỉ mới xong tối qua. Giờ mới có thể “ngâm cứu được”.
    Có mấy vấn đề như sau:
    1/ Đối với các tập tin .jpg ảnh hiển thị rất tốt.
    Ảnh gốc
     
    [Hình: IX1tnbN.png]

    Ảnh với ctrol DBPix

    [Hình: MpihPQ7.png]

     Ảnh với code maidinhdan

    [Hình: 6IsMH2B.png]
     
    2/Nhưng ảnh .BMP thì hiển thị không đạt

    Ảnh gốc

    [Hình: r5qTMVS.png]

    Ảnh với ctrol DBPix

    [Hình: M9gADMf.png]

    Ảnh với code maidinhdan

    [Hình: lHPN3M8.png]
     
    Ảnh bị vỡ nét, xuất hiện những vết màu lạ
    Vì vậy nếu chỉ sử dụng hiện thị ảnh jpg thì được nhưng trong những cuộc thi ảnh nghệ thuật như không khống chế type ảnh như trường hợp của mình thì không được.
    Nếu có hứng thú thì maidinhdan nghiên cứu thêm về vấn đề này nhé.
    3. Còn về việc vấn đề link ảnh không động mà cangkhoonline77 đề cập thì cơ sở dữ liệu acess cần có dữ liệu ảnh chính xác và thư mục ảnh cố định nên cũng không cần việc linh động khi thay đổi tên thư mục chứa ảnh, ví dụ như ảnh học sinh hay CMND cần phải cố định đường dẫn (việc này bắt buột luôn à nha). Tất nhiên nếu cần thì viết code cũng rất dễ dàng. Có đều vấn đề là trong những cuộc thi ảnh với số lượng hàng ngàn ảnh ở vòng loại sau mỗi vòng phải load lại danh sách đường dẫn ảnh đạt vào vòng trong (thư mục mới) để chấm điểm thì việc xử lý kiểu cổ điển không thể đáp ứng tốc độ làm việc của cuộc thi được. Vì vậy phải viết code để import tên ảnh theo từng đợt chấm vào table.
    Sẵn đây mình sẽ giới thệu luôn code này.
    Mình lấy ngay data Code_Xem Anh của maidinhdan làm ví dụ trong table tbnhanvien 2 field. Field Hinh là đường dẫn ảnh, field Socmnd là số thứ tự, ảnh nằm trong folder "D:\AnhNgheThuat\"
    Function DanhSachFile sẽ load danh sách đường dẫn ảnh theo thứ tự tên ảnh
     

    Mã PHP:
    Function DanhSachFile(TenFolder As String, TenTable As String, TenTruong1 As String, TenTruong2 As String)
    Dim ThuTuFile As Integer
    Dim TenFile     As String
     
    ThuTuFile     = 0: TenFile = ""
      
    With Application    .FileSearch
    .LookIn = TenFolder: .Filename = "*.*"
    If .Execute > 0 Then
    For ThuTuFile = 1 To .FoundFiles.Count
    TenFile     = .FoundFiles(ThuTuFile)
     
    CurrentDb    .Execute "IN_SERT INTO " & TenTable & " (" & TenTruong1 & "," & TenTruong2 & ")SELECT """ & ThuTuFile & """,""" & TenFile & """ ;"
     
    Next
    End     If
    End With
     
    End     Function 

     
    Tạo một nút lệnh hoặc ctrol nào đó để xử lý event (ví dụ Command Button TaoDSAnh). Code.
     

    Mã PHP:
    Private Sub TaoDSAnh_Click()
    DanhSachFile "D:\AnhNgheThuat\", "tbnhanvien", "Socmnd", "Hinh"
    End Sub 

     
    Nó sẽ tạo một danh sách đường dẫn đầy đủ để hiển thị số thứ tự và đường dẫn ảnh cho ctrol Hienthihinh trong demo Code_Xem Anh của maidinhdan.
     
    Đối với Demo của mình vì danh sách chỉ lấy tên tập tin cho DBPix control DBPixMain nên hơi khó phải xử lý khác hơn một chút. Vả lại thư mục ảnh làm việc thay đổi liên tục nên phải xử lý theo thư mục chứ database và ảnh của nó.
     
    Vì vậy phải thêm vào Function DanhSachFile
     
     

    Mã PHP:
    TenFile = Right(TenFile, Len(TenFile) - Len(CurrentProject.Path & "\image") - 2)
     
    CurrentDb    .Execute "IN_SERT INTO " & TenTable & " (" & TenTruong1 & "," & TenTruong2 & ")SELECT """ & ThuTuFile & """,""" & TenFile & """ ;" 

     
    Và code TaoDSAnh_Click là
     

    Mã PHP:
    Private Sub TaoDSAnh_Click()
        DanhSachFile CurrentProject.Path & "\Images", "tbnhanvien", "Socmnd", "Hinh"
    End Sub 

     
    Tất nhiên thư mục chứa ảnh phải có tên là images nằm trong thư mục database Code_Xem Anh.
    Do trong điều kiện của bác noname mình phải sửa thành từ IN_SERT khi khi đưa vào modum phải bỏ ký tự _

  • RE: Demo Chèn và hiển thị hình ảnh bằng đường dẫn

    Binhxuan1903 > 25-09-15, 04:07 PM

    Bạn maidinhdan thân mến. Chương trinh bạn rất hay. Mình đanh cần, thanks nhiều nhá. Bạn chỉ mình in ảnh ra report với. Cám ơn nhièu. 
    P/s: vì là dân ko chuyên, hỏi có gì ngu các bác đừng cười.  :008:

  • RE: [Help] Nhờ hỗ trợ Control ActiveX

    Binhxuan1903 > 25-09-15, 04:16 PM

    (02-07-15, 05:31 PM)maidinhdan Đã viết: [i]maidinhdan to TranThanhAn1962[/i]

    Đây là Demo hiển thị ảnh như dùng Window mở vậy, đã test nhìn là thấy mê

    1. Code sử dụng gồm:
    - Chèn vị trí file ảnh
    - Hiển thị hình ảnh theo link được lưu trong table

    2. Thư viên DLL tham chiếu: Không có ( Vì ưu điểm này mà có thể chạy trên tất cả các Hệ điều hành và tất cả các bản Office 2003,2007,2010,2013...

    3. Quy định về Kích thước và kiểu file ảnh: Không có
    + Vì thế bạn đưa bất kỳ file ảnh nào lên dù kích thước lớn hay nhỏ nó tự động canh chỉnh theo khung Text vẽ, và hình mình xem trên Window đẹp như thế nào thì khi xem trên Access cũng như thế.

    4. Hình minh họa khi Load file:

    Hình thứ 1 ( nhấn vào hình để xem thực tế)
    [Hình: Demoxemhinh1.png]


    Hình thứ 2 ( nhấn vào hình để xem thực tế)
    [Hình: Demoxemhinh2.png]


    Demo tải phí dưới.

    Ghi chú:
    - Vì file ảnh khá nặng nên chỉ đính kèm Demo file thôi. Ảnh các bạn kiển và chèn lại nhé
    -Anh TranThanhAn1962 sửa lại tiêu đề dùm em là: "Demo Chèn và hiển thị hình ảnh bằng đường dẫn"

    Thân ái, chúc anh vui khỏe.
    Bạn maidinhdan thân mến. Chương trinh bạn rất hay. Mình đang rất cần, thanks nhiều nhá. Bạn chỉ mình in ảnh ra report với. Cám ơn nhièu. 

    P/s: vì là dân ko chuyên, hỏi có gì ngu các bác đừng cười.  008

  • RE: Demo Chèn và hiển thị hình ảnh bằng đường dẫn

    hungle2006 > 08-03-16, 10:24 PM

    Anh Maidinhdan cho em xin phần mềm quản lý nhân sự bản accde được không để em nghiên cứu, em mới mày mò access nên cần học tập. Email của em: hoangmaikb@gmail.com, em dùng Office 2013, 64bit

  • RE: [Help] Nhờ hỗ trợ Control ActiveX

    maidinhdan > 09-03-16, 11:00 AM

    Câu hỏi thứ 1: từ bạn
    (25-09-15, 04:16 PM)Binhxuan1903 Đã viết: Bạn maidinhdan thân mến. Chương trinh bạn rất hay. Mình đang rất cần, thanks nhiều nhá. Bạn chỉ mình in ảnh ra report với. Cám ơn nhièu. 

    P/s: vì là dân ko chuyên, hỏi có gì ngu các bác đừng cười.  008

    Xem bài này...Có cả Demo: Chèn ảnh vào report ( nếu không có ảnh thì thu gom lại )

    Thân mến!


    Câu hỏi thứ 2: từ bạn

    (08-03-16, 10:24 PM)hungle2006 Đã viết: Anh Maidinhdan cho em xin phần mềm quản lý nhân sự bản accde được không để em nghiên cứu, em mới mày mò access nên cần học tập. Email của em: hoangmaikb@gmail.com, em dùng Office 2013, 64bit

    Ứng dụng quản lý nhân sự mình chỉ mới hoàn thành 80% thôi, và chỉ viết trên Access 2003.

    Bạn cần chức năng về vấn đề gì mình sẽ tách Demo gửi cho bạn,

    Thân mến!