-
02-24-2010, 03:54 AM #1Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Cho mình hỏi Nhập đường dẫn 1 file ảnh vào chương trình để lưu!
Mình có 1 CSDL trong đó có 1 trường dùng để lưu đường dẫn file ảnh(data type là text). Mọi người có cách nào để tạo 1 command button mở ra 1 hộp thoại cho chọn file ảnh và lưu đường dẫn file ảnh đó vào CSDL không ?
Mình kiếm được đoạn Code bên dưới nhưng chạy thì báo lỗi không được.
[QUOTE]Code:
Function getFile(Tit As String, formatName As String, formatType As String)
Dim dlgOpen As FileDialog
Set dlgOpen = Application.FileDialog(msoFileDialogOpen)
With dlgOpen
.Title = Tit
.Filters.Clear
.Filters.Add formatName, formatType
.AllowMultiSelect = False
result = .Show
If (result <> 0) Then
getFile = Trim(dlgOpen.SelectedItems.Item(1))
End If
End With
End Function
Bây giờ trong hành động click của nút nhấn, ta nhập đoạn code sau:
Code:
Me![TxtPic] = GetFile_CLT("c:chetroi:View more random threads:
- liên kết giữa textbox và listbox
- [Hỏi] Biểu tượng hình tam giác màu vàng có dấu chấm thang trong macro !!!
- Gán giá trị trong table vào biến trong ACCESS!
- Xóa dữ liệu ở 2 bảng cùng lúc
- Chỉ giùm việc chuyển dữ liệu sang hàng ngang
- Hỏi xuất dữ liệu Access sang Excel để in!
- Ðề: Cập nhật dữ liệu từ Form vào Table
- Xin code xử lý dữ liệu
- Giúp mua sách của tác giả Ông Văn Thông
- keycode phím # là thế nào vậy ạ?
-
02-24-2010, 06:29 PM #2Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Ðề: Cho mình hỏi Nhập đường dẫn 1 file ảnh vào chương trình để lưu!
Chỉ lưu đường dẫn của File ảnh thôi hay sao bạn.Mà khi lưu đường dẫn nó có thành Hyperlink không?Khi kích và đó có hiện ra hình ảnh khong hay là chỉ lấy đường dẫn thôi.Sao bạn không đưa hình vào trực tiếp luôn.Tại mình nghĩ cái này có làm thủ công được,không cần Code
-
02-24-2010, 06:47 PM #3Banned
- Ngày tham gia
- Dec 2015
- Bài viết
- 0
Ðề: Cho mình hỏi Nhập đường dẫn 1 file ảnh vào chương trình để lưu!
Gửi bởi phuyen89
Trên Form mình sẽ tạo một Image lấy control Source từ trường này như thế với mỗi Record nó sẽ hiện 1 cái ảnh.
Bạn bảo đưa hình vào trực tiếp tức là add luôn ảnh vào CSDL à,như thế không được vì dữ liệu của mình có hơn 5000 khách hàng ,add kiểu thế thì vượt quá 2 Gb
Nếu làm thủ công thì trên Form mình phải tạo 1 cái Image và 1 Textbox để paste link file ảnh,như thế không hay lắm.
-
02-25-2010, 12:28 AM #4Silver member
- Ngày tham gia
- Apr 2016
- Bài viết
- 14
Ðề: Cho mình hỏi Nhập đường dẫn 1 file ảnh vào chương trình để lưu!
Gửi bởi glasseggs
Khi mình kích vào đường LINK ấy thì nó sẽ hiện ảnh.
-
02-26-2010, 01:20 AM #5Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Cho mình hỏi Nhập đường dẫn 1 file ảnh vào chương trình để lưu!
Gửi bởi phuyen89
Giả sử thế này nhé Cty mình tổ chức khóa học cho 30 người ,và có 1 NV mới vào làm ở Cty do đó họ sẽ không biết mặt những người này ( Mà yêu cầu là NV thuộc càng nhiều khách hàng càng tốt,khi CSDL đã có ảnh khách hàng) nếu như cách làm của bạn thì phải nháy đúp 30 lần vào 30 học viên đó để xem ảnh ==> Không thuận tiện cho lắm.
Cách của mình là :
Tạo 1 trường Text để lưu link như 1 Text.
Trên Form mình sẽ tạo một Image lấy control Source từ trường này như thế với mỗi Record nó sẽ hiện 1 cái ảnh ngay khi bản ghi đó hiện trên Form.
Nhược điểm là : Để đưa link vào CSDL mình lại phải làm thủ công là copy hoặc gõ link của ảnh đó vào Text box.
Để khắc phục nhược điểm này mình muốn tạo 1 Command button để mở hộp thoại cho chọn file để lấy link nhưng mình không biết về lập trình
Có tìm được code trên Blog thủ thuật access như mình đã nêu nhưng chạy lại lỗi.
Thank bạn nhé
-
02-26-2010, 05:30 PM #6Silver member
- Ngày tham gia
- Jan 2016
- Bài viết
- 5
Ðề: Cho mình hỏi Nhập đường dẫn 1 file ảnh vào chương trình để lưu!
Gửi bởi glasseggs
Me!txtPic = GetFile("Select the Picture File","*.jpg,*.bmp","Picture")
Trong Function phải đinh nghĩa thêm biến result
Dim result As Long
Khi đó trên Texbox của bạn hiện đầy dủ đường dẫn tới file hình của bạn như thế này : C:-/MyPic\Hinh\Hinhcuatui.jpg
-
02-26-2010, 06:01 PM #7Junior Member
- Ngày tham gia
- Dec 2015
- Bài viết
- 0
Ðề: Cho mình hỏi Nhập đường dẫn 1 file ảnh vào chương trình để lưu!
Gửi bởi LoveBlue
Lúc đó nó báo lỗi ở hàm,dòng này :
Dim dlgOpen As FileDialog
Vì mình chưa học về lập trình,mới đang học SQL nên chịu không biết sửa.Code trên mình copy y nguyên của bạn Noname trên blog của bạn ấy.
Thank bạn.
Để mình thử cách của bạn xuanthanh xem được không mình sẽ up file nhé
-
02-26-2010, 06:06 PM #8Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Cho mình hỏi Nhập đường dẫn 1 file ảnh vào chương trình để lưu!
Gửi bởi glasseggs
Trong màn hình code(của form hay modul bất kỳ) bạn vào menu Tools/Referencer rồi chọn Microsof Office 11.0 Object Libary(nếu dùng Of 2003)
Khi đó bạn mới có FileDialog và khi chạy code không bị báo lỗi nữa
Thân
-
02-27-2010, 04:34 AM #9Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 1
Ðề: Cho mình hỏi Nhập đường dẫn 1 file ảnh vào chương trình để lưu!
Bạn ơi mình dùng AC 2007 thì vào chỗ nào thế.
-
02-27-2010, 06:45 AM #10Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Cho mình hỏi Nhập đường dẫn 1 file ảnh vào chương trình để lưu!
Gửi bởi glasseggs
Hiện nay, trên mạng cũng có rất nhiều diễn đàn mà cánh nam giới chia sẻ với nhau về nghệ thuật bế tinh và coi đó là bí kíp để gìn giữ sức khỏe và tư thế đàn ông. Tuy nhiên, theo giáo sư Trần Quán...
Tư thế yêu mà không xuất của quý ông. Tác hại như thế nào?