Merhaba arkadaşlar daha düzgünü var mı diye baktığımda forumda göremediğim bir kodu paylaşmak istedim 

bu kod yapısında a veya b metin kutusu içerisinde ki verilerden biri dolu olduğu durumlarda işleme devam ediyor mevcut örneklerin hepsi hem a hem b boş değilse şeklinde oldugu için paylaşmak istedim basit bir şey ama iş görüyor

umarım yanlış yere açmamışımdır konuyu

[code=vba]
If IsNull([a]) Then
alan1=0
Else
alan1=1
End If

If IsNull([b]) Then
alan2=0
Else
alan2=1
End If

herkese merhaba
oracle veritabanından sorguyla veri almak istiyoruz
sevkiyat adlı tablomuz var sutunlar(alan adları) -sevkno, musterıno, musteriadı, sevktarihi, sevkmiktarı, plaka vs.-

benim istediğim şöyle bir tablo oluşturmak
sutunları- musterıno, musterıadı,nisan1-10 arası sevkmıktarı,nisan 11-20 arası sevkmıktarı, nisan 21,31 arası sevkmiktarı-ndan oluşan bir tablo almak istiyorum sorgu ile
bu konuda acil yardım lütfen
herkese iyi çalışmalar.

Merhaba,

Anaform üzerinde proje>güzergah seçerek "puantaj"a tıkladığımda açılan formda tarih aralığı belirleyerek "çetele ekle" butonuna tıkladığımda toplu kayıt işlemi yapmakta. aynı form üzerine "cumartesi yok" ve "pazar yok" etiketli 2 tane seçim kutusu ekledim. bu kutular seçili ise (ikisi yada biri) o günler için tek sayısı olarak "0" değerini işlesin.
çetele eklemek için kullandığım kodu sağ olsun Sezgin bey hazırlamıştı.
bu konuda yardımcı olursanız sevinirim.
örneğim ektedir.

İyi Forumlar
3 Tane alanım ve bir kaydet butonum var 3 alan doldurulup kaydete basınca msgbox kutusu açılıp başarıyla kaydedildi mesajı veriyor ancak 3 alan dolmadan bastığımızdada verdiği için istediğim gibi olmuyor sizlerden ricam o 3 alana giriş yapıldıktan sonra kaydet butonu açılsın veya giriş yapılmadan butona basılırsa mgsbox kutusu veri girişi yapmadınız diye mesaj verip kabul etmesin yardım edebilecek arkadaşlara teşekkürler şimdiden

selam

basit bir hatırlatma yapmak istedim fakat olmadı

örneğin
hatırlatmalar tablosunda bu güne ait bir tarih ve not ve hatırlatması için evet hayır alanları var

tarih
not
aktif-pasif

gunu gelince olayını sorgu ile alabiliyorum fakat istediğim akti ise hatırlatsın değilse hatırlatma çalışmasın

[code=vba]Function Hatirlatma()
Dim hatirlat As Integer
Dim bastar, bittar As String

bastar = "#" & Format(Date, "yyyy") & "/" & Format(Date, "mm") & "/" & Format(Date, "dd") & "#"

Lütfen bir bilen yardımcı olurmu ekte gönderdiğim örnekte form bölümünde ürünün fiyatı 0 ise zemini kırmızı boyamasını istiyorum lütfen bilen bir kişi yolu gösterir mi.

If IsNull(tcno) Then
[pzradi].Visible = False
[sagsol].Visible = False
[tezgahsy].Visible = False
[sirano].Visible = False
[sicilno].Visible = False
[adi_soyadi].Visible = False
Else
[pzradi].Visible = True
[sagsol].Visible = True
[tezgahsy].Visible = True
[sirano].Visible = True
[sicilno].Visible = True
[adi_soyadi].Visible = True
End If

bunu rapor açıldığında bölümüne yazıyorum ama nerede yanlış yaptım bilmiyorum tc no boşsa bilgilerini göstermesin istiyorum

Merhabalar,

Access dosyasını açışta capslock kapalı ise otomatik açarmı,

accesstr, sitesinden bulduğum kodlar var ama nasıl kullanacağımı da bilmiyorum.

Bilgisi olan arkadaşlardan yardım istiyorum,
Kolay Gelsin

accesstr den bulduğum kodlar
Public Const VK_CAPITAL = &H14
Public Type KeyboardBytes
kbByte(0 To 255) As Byte
End Type

Public kbArray As KeyboardBytes
Public Declare Function GetKeyState Lib "user32"
(ByVal nVirtKey As Long) As Long
Public Declare Function GetKeybo

Sayin Yardimsever Dostlar

access calismamda giris sayfasinda firma kutum aktif oldugu zaman giris butonumda aktif oluyor... fakat listem bos ise kutum ve giris butonum pasif kalsin istiyorum...

simdiden yardimlariniz icin tesekkur ederim

Sifre ornekleri

taruz - t
mumacc - mum
muaz - 123

muaz kullanicisi icin firma kutusu bos

[attachment=8480]

Tablomda 3 kolon var 1-ID (otomatik sayı) 2-ADI 3-SOYADI

daha önce girilen ADI ve SOYADINI sildikten sonra otomatik sayınında silinmesini istiyorum

tabloda nasıl bir kod yazabilirim Teşekkürler


[Resim: http://www.dosyayukleyin.com/do.php?img=4152]