Etiketler
|
|
|
VBA Kodunda Hataları Bulan Program : Project Analyzer
|
VBA kodunuzun analizini yapan program tertemiz bir kod yazılması için tüm hünerlerini sergiliyor.
*** Ölü kodları temizleyerek projenizi hızlandırıyor.
*** Program içinde unutulan, mantık hatası yapılan yerleri tespit edebiliyor.
*** Kullanılmayan fonksiyon ve modülleri siler.
*** Kodunuzu optimize eder,
*** Kusurlu, gizli hataları düzeltir
*** Akış şemasını çizebilir
*** Kodların kullandığı DLL, OCX vs. gösterir
Daha bir sürü özelliği olan program gerçekten mükemmel özelliklere sahi
|
Lisanslama kodunda hata
|
s.a.
[vb]Private Sub Form_Open(Cancel As Integer)
Dim Yetki As String
Yetki = Dlookup ("Yetki", "tblsifre", "[ID]=" & Forms!frmşifre!kullanıcı.Value)
If Yetki = "Admin" Then
k1 = Dir("c:\windows\system32\def.txt")
If k1 = "" Then
MsgBox "Üzgünüz. Lisans işlemleriniz yapılmamış. Lütfen bizimle irtibata geçiniz", vbCritical, "DİKKAT - Lisanssız program kullanımı"
DoCmd.OpenForm "frm_Lisans"
k2 = Dir("c:\windows\system32\abc.txt")
If k2 = "" Then MsgBox "Üzgünüz. Lisans işlemleriniz ya
|
Sql kodunda sıralama sorunu.
|
rs.Open "SELECT * FROM [ILACLAR] ORDER BY IIf(IsNumeric(Mid([ILAC_NO],1,1)),1,2), IIf(IsNumeric(Mid([ILAC_NO],1,1)),[ILAC_NO],Mid([ILAC_NO],3))*1;", Baglan, 1, 1
Bu kod ile sayıları ve harf ile başlayan (A-109 gibi) sayıları sıralatabiliyorum.
101-A
101-B
101-C
101-D
101-E
101-F
ACL-200
LMC-001
KCC-201
gibi harf ile biten ve başında üç harf bulunan sayılar için bu çalışmıyor.Bu kodda nasıl revize yaparsam bu verdiğim sayılarıda sıralamaya sokabilirim.
|
Yazar: Akifff - Cevaplar: 4 - İzleme: 1371
Raporlama Kodunda Hata Veriyor
|
Merhaba arkadaşlar,
Ekteki veritabanımda resimde gördüğünüz gibi bir uyarı alıyorum. Daha öncesinde Office 2010 accdb formatındayken gayet güzel çalışyordu fakat mdb ye çevirdiğimde bu hatayı veriyor. Nasıl çözeriz Teşekkürler.
Servis Giriş Formunda bir kayıt için Görev Emri butonuna bastığımda raporu açıyordu. Şimdi Raporda personel isimleri hata veriyor.
[Resim: https://accesstr.net/resim/do.php?img=5015]
|
vb kodunda ufak bir hata
|
sayın üstadlarım merhaba;
bir düğme tıklanma yordamına bir tablo açtırmak istiyorum ancak bundan önce bir mesaj kutusuyla uyarmak istiyorum ve evet, hayır seçenekleri olacak kişi evet derse kontrol paneli kapanacak ve tablo açılacak hayır derse bi işlem yapmadan kontrol panelinde kalacak
eveti seçince kontrol panelini kapatamadığım için mesaj kutusunun önüne kapanması için kodu ekledim ancak hayır deyince kontrol panelini tekrar açmadığı için altına bir satır daha ekledim hayır derse kontrol
|
Form.recordset Kodunda Hata Almaktayım.
|
Merhabalar arkadaşlar,
Access ile DepoTakip sistemi hazırlamaktayım. ADO ' yu kullanarak bağlantı ve kayıt oluşturmaktayım. Sorunum Fiş Giriş formunu açtığımda sistem form.recordset koduna geldiğimde hata veriyor ve hata ayıklama moduna düşüyor daha sonrada program kapatılıyor. Örnek resimler ektedir.
Ancak Access 2010 sürümünde prgramı çalıştırdığımda herhangi bir hata vermedi düzgün bir şekilde çalıştı. Bu hatayı Access 2016 versiyonunda almaktayım. Acaba 2016 versiyonundan kaynaklı
|
Access (vb)'te Kaynak Kodunda Tanımlı İfade Çağırabilmek
|
MErhaba Arkadaşlar;
Aşağıdaki kodda göreceğiniz olusturtarih1 ve olusturtarih2 ifadelerini listekutusu isimli listekutusunun kaynak koduna çağırmak istiyorum.
Bu alanların forma çağrılması konusunda sorun yok. Denemek için metin kutusu yaptım istediğim gibi kodlar geliyor. Fakat Select ifadesi içerisinde & [size=small][font=Monaco, Consolas, Courier, monospace]" & [olusturtarih1] & " ve [size=small][font=Monaco, Consolas, Courier, monospace] & [olusturtarih1] & ve hatta [size=small][font=Monac
|
Insert Into Kodunda Hata
|
iYİ AKŞAMLAR
INSERT INTO ile Formdan tabloya kayıt yapmaya çalışıyorum. Eksik işleç diye bir hata veriyor sebebi nedir. Yardımlarınız için teşekkürler.
[Resim: https://accesstr.net/resim/do.php?imgf=1...045681.jpg]
[Resim: https://accesstr.net/resim/do.php?imgf=1...706332.jpg]
Bu arada bu hataya rağmen tabloya kaydı atıyor. Kodda Türkçe karakter sorunuda yok.
|
Ado İle Kaydet Kodunda Hata Alıyorum
|
Arkadaşlar Ado ile kaydet butonun kodlarını bir arkadaşın çalışmasından alarak ve öğrenerek uyarlamaya çalışıyorum. lakin hata alıyorum. İlgilenebilir misiniz?
[sql]
If IsNull(Me.txtid) Or Me.txtid = "" Then
MsgBox "Lütfen Öğrenci Kayıt Sırasını Yazınız!", , "Kayıt İşlemi"
Me.txtid.SetFocus
Exit Sub
End If
Dim txtidKontrol As Long
txtidKontrol = Nz(DCount("ogrid", "tbl_ogrenciler", "ogrid='" & Me.txtid & "'"))
If txtidKontrol <> 0 Then
Cancel = False
MsgBox "Girmekte Oldugu
|
Php Kodunda Hatalar
|
Kendi Yazdığım Scriptte Acunetix Ve Rips Gibi Yazılımlar İle Tarama Yaptım Ve Birçok Hata Aldım, Genelikle Hatalar Kendini Tekrar Ediyor Örnek Olarak Db Dosyam Tüm Sayfalarda Çalıştığı İçin Db Dosyamdaki Bir Hata Kendini Diğer Sayfalarda Da Gösteriyor. Netten Sürekli Araştırmalar Yapıyorum Ama Hataların Çözümlerini Bulamıyorum. Rips Hataları Gösterdiği Gibi Çözümlerinide Sunuyor Ancak Çözümlerdeki Gibi Yaptığım Halde Bile Hata Almaya Devam Ediyorum.
Örnek Hatalar ;
[img]https://resim.acce
|