Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Tabloya Veri Eklerken Hata Alıyorum

pelitt
pelitt
Access Cevaplanmış Soruları
3
1372

Tabloya Veri Eklerken Hata Alıyorum

#1
pelitt
Üye
pelitt
Bul
Üye
Adı Soyadı: se.... pe....
Konum: Tokat
Ofis Versiyonu: Ofis 2007
Son Oturumu: 17/11/2018,00:29
Yorumları: 32
Konuları: 8
Kayıt Tarihi: 19/03/2017
Teşekkür Puanı: 0
[Resim: 9473incij5069559.png]

Kod:
Private Sub AdiNe_AfterUpdate()
Dim perBirim As Variant
Dim perSicilim As Variant


'alan adı
'tablo
'ölçüt

perBirim = DLookup("[Birimi]", "[Personel]", "[Adi]='" & AdiNE + "'")

Birimi = perBirim

perSicilim = DLookup("[SicilNo]", "[Personel]", "[Adi]='" & AdiNE + "'")

perSicil = perSicilim


End Sub


Private Sub btnKaydet_Click()

Dim Zimekle As String

Zimekle = "INSERT INTO Zimmetler (barkodNo,perSicil,urunTur,alma) VALUES (" & CInt(barkodNo) + "," & CInt(perSicil) + "," & CInt(urunTurId) + "," & CDate(alma) + ")"


DoCmd.RunSQL Zimekle


End Sub
Ekle dediğimde hata alıyorum sanırım bu variant tipinden kaynaklı ama dönüşüm olmuyor. bu sorunu nasıl çözebilirim yardım edebilirmisiniz.

hata kodu Type mismatch
Son Düzenleme: 25/03/2017, 16:25, Düzenleyen: pelitt.
Cevapla
#2
pelitt
Üye
pelitt
Bul
Üye
Adı Soyadı: se.... pe....
Konum: Tokat
Ofis Versiyonu: Ofis 2007
Son Oturumu: 17/11/2018,00:29
Yorumları: 32
Konuları: 8
Kayıt Tarihi: 19/03/2017
Teşekkür Puanı: 0
Sorunu çözdüm ancak veri eklerken bir uyarı çıkıyor geri alamazsınız vs. diye bunu nasıl engelleyebilirim

İkinci sorumda Textbox ın boş olmadığını normalde if alan<>null ile anayabiliyorduk ama accesde nedense kabul ettiremedim nasıl yapmalıyım 

if alan<>null
if alan=null
if alan.isNull
if alan="" 
denedim ama kod işlemiyor
Son Düzenleme: 25/03/2017, 20:27, Düzenleyen: pelitt.
Cevapla
#3
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: 20/12/2024,22:58
Yorumları: 13.542
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur
Merhaba,

Sorunuzu çözdüyseniz nasıl çözdüğünüzü konunuza yazınız. Benzeri problemi yaşayanlar böylelikle çözüm bulabilirler.

Sorunuzu çözdükten sonraki farklı sorularınız için yeni konu açmalısınız. Konularınıza mutlaka örnek uygulama ekleyin.

(25/03/2017, 19:20)pelitt yazdı: Sorunu çözdüm ancak veri eklerken bir uyarı çıkıyor geri alamazsınız vs. diye bunu nasıl engelleyebilirim

Bunun için, kodunuz 1. mesajdaki kod olarak varsayarsak


DoCmd.RunSQL Zimekle

Kodunu 



docmd.setwarnings false

DoCmd.RunSQL Zimekle

docmd.setwarnings true

Kodu ile değiştirerek deneyiniz.
Sonraki sorunuz için cevap yazamayacağım, Site Kuralları gereği birden fazla soruyu aynı konu içerisinde soramazsınız. Üstteki cevabımı ilk konularınız olduğu için yazdım.
Cevapla
#4
pelitt
Üye
pelitt
Bul
Üye
Adı Soyadı: se.... pe....
Konum: Tokat
Ofis Versiyonu: Ofis 2007
Son Oturumu: 17/11/2018,00:29
Yorumları: 32
Konuları: 8
Kayıt Tarihi: 19/03/2017
Teşekkür Puanı: 0
Cevap için teşekkür ettim.
Genelde bu tarz insert işlemi yaparken tek veri ekleterek doğru veri türü oldugunu teyit ederim. Ancak bu defa biraz aceleci davradım. Neyse sadece barkodNo ekledim hata verdi hatayı tablo alan türünü uzun sayı olarak değiştirdiğimde diğer sayılarıda aynı şekilde değiştirdim sıkıntı kalmadı.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task