+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Dersleri (https://accesstr.net/forum-access-dersleri.html)
+--- Konu Başlığı: DoCmd.RunCommand acCmdCopy (/konu-docmd-runcommand-accmdcopy--15376.html)
DoCmd.RunCommand acCmdCopy - accessman - 09/10/2012
İYİ GÜNLER
bu
DoCmd.RunCommand acCmdCopy
satırını işlerimi kolaylaştırmak için kullanıyorum nasıl mı
ufak bir programcık yaptım
bu herzaman görev çubuğunun üstünde bulunuyor
içinde bir tablo var tabloda iki alan var
bir de form var formda sadece bir açılan kutu var
açılan kutu da tablonun alanına bağlı
bu açılan listenin görevi benim otomatik tamamlama bilgilerini tutmak
mesela forumlara göre kullanıcı adı şifre vs
veya ahbs programı için diyelim
"geceleri yatmadan bir saat önce"
"yemekten iki saat sonra"
gibi çok kullandığım kelime gruplarını bu tabloya kaydettim
liste güncelleme sonrası olayına da
Kod:
DoCmd.RunCommand acCmdCopyaçılan kutuyu açıp istediğim otomatik tamamlama cümlesini seçiyorum
seçtiğim kelime grubu clipboarda eklenmiş oluyor
herhangi bir programın herhangi bir metin yazılacak kısmını tıklayıp
ctrl+v yapınca seçtiğim kelime grubu buraya ekleniyor
basit ama çok işimi görüyor
dahada geliştreceğim
Kod:
Private Sub Açılan_Kutu117_AfterUpdate()
Dim hwnd, strString As String
hwnd = hwndAHBS
strString = Açılan_Kutu117.Column(0)
SendMessageString hwnd, WM_SETTEXT, 0, strString
End Subdaha süper olacak
üstelik listenin görünen kısmında asıl bilgiler değil sizin belirlediğiniz kodlar olur
yani açılan kutuda görünen kelime
"accesstr kullanıcı adı"
iken sizin copy paste yaptığınız
"kjkjg555546cc@23"
gibi bir şifre veya kelime olabilir
isterseniz şifre gibi önemli olanları
kodun içersine gömerek yapabilirsiniz
seçilen a ise diyerek kod yazınca
başkası asıl kelime grubunu göremez
Cvp: DoCmd.RunCommand acCmdCopy - ozanakkaya - 09/10/2012
Anlatım için teşekkürler, konu Access dersleri bölümüne taşınmıştır.
Cvp: DoCmd.RunCommand acCmdCopy - ozguryasin - 09/10/2012
Anlatım için teşekkürler