Pdf yi formda görmek
#19
anlamsız konuşmanın bir faydası yok biz nasılki sizin bir kodunuzu kullandığım zaman bu kodda şu kişiden faydalandım diyor isem onu bekliyorum ben gerektiği yerde gereken saygıyı gösteririm aynı şeyin banada yapılmasını isterim modalı arkadaşa gerçekten saygı duyarım ancak belirtmesini beklerdim bu soruna daha önce falanca kişi çözüm getirmişti diye neyse o kadarda önemli değil acrobat readerin nesnesini tabiki ben yapmadım zaten öyle bir şeyde ima etmedim edememde bunu yapan acrobat reader şirketi tabiki sdk sında bunun nasıl kullanılacağınıda gösteriyor ancak şu anda siz öyle bir tavır takındınızki sanki siz kod yazınca activex leride kendiniz yapıyormuş gibi bir tavır içine girdiniz unutmayalım hiç birimize kodlar vahiy ile gelmiyor lazım olunca bir kısmını buluyır bir kısmını kendimiz ekliyoruz
windowsun browser desteği olmasa idi kim herhangi bir klasörden bir nesneyi çağırabilir yada onu form üzerinde gösterebilirdi

neyse uzatmaya gerek yok kodun getfile kısmı microsoft amcaya ait acro kısmı ise acrobat firmasına fakat bu kısım tamamen bana aittir

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



  Alıntı
Bu mesajı beğenenler:
#20
Arkadaşlar,
14 nolu mesajımdaki soruma henüz bir cevap alamadım,
acaba sorumu zor, yoksa bu konuyamı küstünüz Smile
selamlar...



  Alıntı
Bu mesajı beğenenler:
#21
pdf leri raporda görmede bir sorun var değişik pdf viewer activex leri denedim onlarda formda gösteriyor ancak raporda göstermiyor ayrıca webrowser de formda gösteriyor raporda göstermiyor ancak bir yolu olabilir belki ancak ben bilmiyorum diğer soruna gelince


Visual Basic
  1. Dim fileName As String
  2. fileName = Me.pdf
  3. Shell "explorer /select," & fileName, vbNormalFocus



cevabı bu



  Alıntı
Bu mesajı beğenenler:
#22
Çok çok teşekkürler sayın esrefgit,
elinize sağlık.



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [SORGU] Ilgili Satırda Bir önceki Satırın Notlarını Görmek dmn815 2 432 15-10-2022, 09:48
Son Mesaj: dmn815
  Giriş Ve çıkışları Aynı Raporda Görmek Istiyorum ahmet114 34 2.265 04-10-2021, 14:15
Son Mesaj: dsezgin
  [RAPOR] Raporun Altında ürünler Ve Toplamları Görmek mart02 0 400 24-05-2021, 19:45
Son Mesaj: mart02
  [FORM] Tablolara tek formdan kayıt girmek ve kayıtları görmek ozer71 2 1.758 09-02-2017, 11:25
Son Mesaj: ozer71
  [FORM] Tabloya Eklenen Tum Fotoları Tek Formda Gormek ybuyulu 3 1.802 21-11-2014, 16:59
Son Mesaj: ybuyulu
  [FORM] Kullanıcı girişi yapıldıktan sonra diğer kullanıcıların veri girişlerini görmek yebala 17 7.414 11-06-2014, 12:33
Son Mesaj: memmetcavus
  [SORGU] Sorgudaki toplam satır sayısını görmek berbatov 4 4.591 12-04-2014, 15:19
Son Mesaj: dsezgin
  [FORM] Formda yer alan değere göre alt formda satır açma Emre061 12 6.348 08-03-2014, 11:33
Son Mesaj: Emre061

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi