Forma Resim Ekleme, Kopyalama ve Arşivleme - Baskı Önizleme +- AccessTr.neT (https://accesstr.net) +-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html) +--- Forum: Access Örnekleri ve Uygulamaları (https://accesstr.net/forum-access-ornekleri-ve-uygulamalari.html) +--- Konu Başlığı: Forma Resim Ekleme, Kopyalama ve Arşivleme (/konu-forma-resim-ekleme-kopyalama-ve-arsivleme.html) |
Cvp: Forma Resim Ekleme, Kopyalama ve Arşivleme - vetaltan - 15/06/2010 ercan hocam ellerinize sağlık,yapmış olduğunuz program çok işime yaradı. size bir sorum olacak; programınızda sadece jpg formatında resimler jpg olarak resim klasörü içine kaydediliyor.Acaba jpg,ico vb formatta olan resimleri bmp formatına değiştirerek kaydedebilirmiyiz. ben acemice sizin kodlarınızda aşağıdaki değişikleri yaptım.tabiki çalışmadı yardımcı olursanız sevinirim Private Sub RESIM_DblClick(Cancel As Integer) Dim ekocan As String Dim altan As String Dim bute As String altan = StrReverse(CurrentDb.Name) bute = Trim(Mid(altan, 13)) help = "help.file" '? If Resim.Picture = StrReverse(bute) & "vetpro08\resim\" & Form_HASTAMASTERFM.PROTOKOL.Value & ".BMP" Then ekocan = "C:\Program Files\IrfanView\i_view32.exe " & StrReverse(bute) & "VETPRO08\resim\" & Form_HASTAMASTERFM.PROTOKOL.Value & ".BMP" Call Shell(ekocan, 1) Exit Sub Else Dim r r = MsgBox("Hastamızın Resmi Kayıtlarımızda Bulunmamaktadır!", 32 + vbYesNo, "VetPro08 Bilgilendirme!") If r = vbYes Then Dim Kaynak, Hedef Kaynak = GetOpenFile_CLT("C:\", "VetPro08-Resim Seçiniz...") Hedef = StrReverse(bute) & "vetpro08\resim\" & Form_HASTAMASTERFM.PROTOKOL.Value & ".bmp" If Kaynak = "" Then Exit Sub Else FileCopy Kaynak, Hedef Me.Requery End If End If End If End Sub Cvp: Forma Resim Ekleme, Kopyalama ve Arşivleme - vetaltan - 16/06/2010 değerli arkadaşlar, mde formatında jpg resimleri form üzerinde gösteremediğim için önceki mesajda yazdığım gibi jpg yada diğer formattaki resimlerimi forma kod kullanarak bmp formatında nasıl ekleyebilirim. Cvp: Forma Resim Ekleme, Kopyalama ve Arşivleme - ercansahin - 16/06/2010 Uygulamanın kodlarında yazılı *.jpg yazılı olan yerleri *.bmp ile değiştiriniz. Ancak bu durumda seçeceğiniz resimlerin bmp uzantılı olmasına dikkat etmeniz gerekecektir. Cvp: Forma Resim Ekleme, Kopyalama ve Arşivleme - vetaltan - 16/06/2010 teşekkür ederim,ancak benim istediğim;seçtiğim resimlerin bmp formatı olmaması durumunda bmp olarak nasıl kaydedebilirim. Cvp: Forma Resim Ekleme, Kopyalama ve Arşivleme - ozturk03 - 22/06/2010 faydalı bir paylaşım,teşekkürler.kolay gelsin Cvp: Forma Resim Ekleme, Kopyalama ve Arşivleme - uzunlarbilisim - 20/11/2010 Harika |