Teşekkürler sayın taruz,
işin garibi, sayın modalının ekledigi belge sorunsuz çalışıyor,
aynı kodları ve aynı kompenendleri benim çalışmamada ekliyorum hata iletisi alıyorum,
selamlar

Merhaba üstadlarım,
2 konu daha çıktı ilgilenirseniz çok sevinirim,
Formda gördügümüz pdf raporda görünmüyor,
Neden acaba?
resim her ikisindede görünüyor.
Belgeye git butonu ile, direk esas belgeye nasıl gidebiliriz?
İyi çalışmalar...

08-03-2007, 12:31
accessde acrobat reader.ocx kodu lazım aynen nortwindeki resim olayı gibi ama biraz farklı bunda liste kutusu var ve orda belirlediğim klasördeki pdf lerin isimleri görünüyor benim istediğim listedeki isme tıklayınca pdf nesne ekranında ilgil pdf görünecek ve onun yolunu tabloya ekleyecek bir sonraki açışımda ilgili kayıta geldiğimde o pdf görünecek ve daha önce eklediğim için eklenecek ler listesinde adı çıkmayacak yani kısaca bu evrak kayıt programına eklenecek bir uygulama artık teknolojiye ayak uydurduk ve evraklar pdf olarak geliyor
09-03-2007, 09:26
sanırım cevap veren yok en iyisi kendim yapayım yada bir yerden bulayım ve forma ekleyeyim
Türk-Han


Giriş: 20/01/2006
Mesaj: 30


--------------------------------------------------------------------------------

Gulsum1 aslına bakarsan sizin accesle ilgili soru sormanıza şaşırdım. Takip ettiğim kadarı ile siz hep cevaplayan taraf olmuşsunuz. Ama inanıyorum ki siz bu problemede çözüm bulursunuz. Başarılarınız daim olsun.

11-03-2007, 16:57 #5
gulsum1




Giriş: 22/01/2007
Mesaj: 816
Excel Vers. ve Dili:
2003
cevap

--------------------------------------------------------------------------------

Private Sub pdfekle_Click()

getFileName

End Sub



Private Sub pdf_AfterUpdate()
If pdf.Value <> " " Then
ACRO.src = pdf.Value
End If
ACRO.Height = 6060
ACRO.Width = 5370
End Sub

Sub getFileName()
Dim fileName As String
Dim result As Integer
With Application.FileDialog(msoFileDialogFilePicker)
.Title = "Select Employee Picture"
.Filters.Add "All Files", "*.*"
.Filters.Add "pdf", "*.pdf"
.FilterIndex = 3
.AllowMultiSelect = False
.InitialFileName = CurrentProject.Path
result = .Show
If (result <> 0) Then
fileName = Trim(.SelectedItems.Item(1))


Me![pdf].Value = fileName
Me![SAYI].SetFocus

End If
End With
End Sub
Private Sub Form_Current()
If pdf.Value <> " " Then
ACRO.src = pdf.Value
End If
ACRO.Height = 6060
ACRO.Width = 5370


End Sub


11-03-2007, 17:43 #6
modalı
Uzman




Giriş: 25/12/2005
Bölüm: İstanbul
Mesaj: 3,615
Excel Vers. ve Dili:
MS Office 2003 Pro Türkçe

--------------------------------------------------------------------------------

Sayın gulsum1,

Çok güzel olmuş. Teşekkür ederim.

İyi çalışmalar


07-07-2009, 23:19 #11
akd


Giriş: 14/08/2004
Mesaj: 810

--------------------------------------------------------------------------------

Sayın gulsum,
bende aynı listeden hem pdf hemde resim çağırıyorum,
listeye tıkladığımda, o link pfd ise sorun yok
eger resim linki ise o zaman hata iletisi alıyorum,
linkteki belgenin pdf mi yoksa resimmi olduğunu onlayan,
bir kodu nasıl yaparız yada başka yol varmı?
selamlar...




EMEĞE SAYGI.!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Eşref bey samimi olarak soruyorum; kim, kimin emeğine saygısızlık yapmış anlamadım..

Yukarıdaki örnek size mi aittir? Bol ünlemli mesajından bunu mu anlamamız gerekiyor?..

sayın taruz gülsümün benim kızım olduğunu sanırm bilmiyorsunuz fakat şimdi öğrendiniz diyecektim ki bana gönderdiğiniz gayet anlamlı bir mesaj aklıma geldi

Diğer yönetici arkadaşlarım ve ben gerek gulsum1, gerek gules, gerekse esrefigit kullanıcı adlarıyla yer aldığınız forumlarda sizi yakından takip etmekteyiz. (Hiç bir açıklama olmasa bile yazı yazma biçiminizden aynı kişi olduğunuz açıkça anlaşılıyor).

not özel mesajın kalan içeriği beni uyarı niteliği taşıyordu merak edenler için

sayın taruz sorunuza gelince


http://www.excel.web.tr/showthread.php?t=28501

başka söze gerek yok

Eşref Bey sizin kim olduğunuzu çok çok iyi biliyorum.. Amacım polemik değil..

Ben size sadece yukarıda sayın modalı'nın eklediği mdb veya benim eklediğim dll size mi ait, sizin ürettiğiniz kodlarla mı yapıldı bunu sordum.. "Emeğe saygı" diyerek haykırmanızın sebebi nedir? Ürettiğiniz bir eser mi paylaşıldı bu sayfada? "Sayın modalı'nın eklediği örneğin kodlarının bir kısmını ilk ben paylaştım excel.web.tr de" diyorsanız eğer paylaşımınız için teşekkürler.. Bu kodları sizin üretmediğinizi biliyoruz hepimiz.. Bundan dolayı tepkinizi anlamsız ve gereksiz görüyorum..