AccessTr.neT
Raporlamada çıkan görüntü - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Raporlamada çıkan görüntü (/konu-raporlamada-cikan-goruntu.html)

Sayfalar: 1 2


Raporlamada çıkan görüntü - malidolu - 28/09/2009

Merhaba Arkadaşlar ;
Girilen siparişlerin raporlarını istediğimde ekranda ekteki görüntü çıkıyor ve istenilen rapordaki her bir resimi tek tek sayıyor.Bu görüntüden kurtulmanın bir yolu varmı...Teşekkürler..


Cvp: Raporlamada çıkan görüntü - firdevs - 28/09/2009

Hangi ek? Ben ek göremiyorum...


Cvp: Raporlamada çıkan görüntü - malidolu - 28/09/2009

Kusura bakmayın
resim eklemede sıkıntı yaşıyorum


Cvp: Raporlamada çıkan görüntü - benremix - 28/09/2009

Sn Malidolu programı eklesen. Saygılar..


Cvp: Raporlamada çıkan görüntü - malidolu - 28/09/2009

Değerli arkadaşlar resim ekleyemiyorum bu nedenle sorun devam ediyor.Saygı bizden.Diyer arkadaşların bahsettiğigibi rar dosyalarını indiremiyorum.indi gibi görünüyor fakat dosyanın içi boş.Bilrmiyorum..


Cvp: Raporlamada çıkan görüntü - ozanakkaya - 28/09/2009

sn malidolu, 3. mesajınıza resim eklemişsiniz, çözümü yazıyorum
Uygulamada açılan ilk forma aşağıdakileri yazıp açıldığında olayına

Kod:
call kapat()
kodunu yazmayı deneyin.

Kod:
Function Kapat()
Dim sReturn As String
Dim sErr
Dim WS As Object
Set WS = CreateObject("WScript.Shell")
sReturn = WS.regread("HKCU\Software\Microsoft\Shared Tools\Graphics Filters\Export\JPEG\Options\ShowProgressDialog")
If sReturn = "Yes" Then 'change ShowProgressDialog entry to "No"
WS.regwrite "HKCU\Software\Microsoft\Shared Tools\Graphics Filters\Export\JPEG\Options\ShowProgressDialog", "No"
End If
sReturn = ""
sReturn = WS.regread("HKCU\Software\Microsoft\Shared Tools\Graphics Filters\Import\JPEG\Options\ShowProgressDialog")
If sReturn = "Yes" Then 'change ShowProgressDialog entry to "No"
WS.regwrite "HKCU\Software\Microsoft\Shared Tools\Graphics Filters\Import\JPEG\Options\ShowProgressDialog", "No"
End If
sReturn = ""
sReturn = WS.regread("HKLM\Software\Microsoft\Shared Tools\Graphics Filters\Export\JPEG\Options\ShowProgressDialog")
If sReturn = "Yes" Then
WS.regwrite "HKLM\Software\Microsoft\Shared Tools\Graphics Filters\Export\JPEG\Options\ShowProgressDialog", "No"
End If
sReturn = ""
sReturn = WS.regread("HKLM\Software\Microsoft\Shared Tools\Graphics Filters\Import\JPEG\Options\ShowProgressDialog")
If sReturn = "Yes" Then
WS.regwrite "HKLM\Software\Microsoft\Shared Tools\Graphics Filters\Import\JPEG\Options\ShowProgressDialog", "No"
End If
sReturn = ""

Set WS = Nothing
End Function