Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
29/12/2011 15:02
Konu Sahibi
erkanb
Yorumlar
5
Okunma
1646
Konuyu Oyla:
  • Derecelendirme: 5/5 - 1 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 5/5 - 1 oy

erkanb

Aktif Üye
Kullanici Avatari
Aktif Üye
E.... B....
38
06/11/2009
0
Tekirdağ
Ofis 2003
09/07/2013,17:43
Çözüldü 
Merhabalar,

Tabloya bir kayı girildiğinde yine o tablodaki bir fielde otomatik olarak o bilgisayarın kullanıcı adını girmesini istiyoum. Bunu nasıl yapabilirim. Yardımcı olursanız çok sevinirim. Teşekkürler.


erkanb, 06-11-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Seruz

Uzman
Kullanici Avatari
Uzman
S.... U....
1.553
7
30/10/2008
814
Tekirdağ
BT Şefi
Ofis XP
17/04/2018,23:02
Çözüldü 
Aşağıdaki konuda bilgi bulabilirsiniz.
<a href="https://www.accesstr.net/konu-kullanici-ve-bilgisayar-adi-bulduruyoruz.html">Kullanıcı ve Bilgisayar Adı Bulduruyoruz</a>

Daha fazla yardımcı olmamız için lütfen örnek ekleyiniz.


Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla

Coskun0559

Uzman
Kullanici Avatari
Uzman
C.... Ç....
1.221
02/11/2008
511
Tekirdağ
-
02/02/2018,17:23
Çözüldü 
Küçük bi örnek hazırlamaya çalıştım.
kısaca anlatayım.Uygulamana 1 adet modül ekle ve kodlarını;

Visual Basic Code
1
2
3
4
5
6
7
Public Declare Function GetUserNameA Lib "advapi32.dll" (ByVal lpBuffer As String, nSize As Long) As Long
Public Function GetUserName() As String
' Simple sub to get our windows username
   Dim UserName2 As String * 255
   Call GetUserNameA(UserName2, 255)
   GetUserName = Left$(UserName2, InStr(UserName2, Chr$(0)) - 1)
End Function

şeklinde değiştir.
Formuna 1 adet metin kutusu ekle ve denetim kaynağına;

Visual Basic Code
=GetUserName()

yaz
Formundaki veri girdiğin alanların(ben demirbas alanı için yaptım) güncelleştirme sonrası olayına;

Visual Basic Code
Private Sub Demirbas_AfterUpdate()
Me.KartiAcanKullanici.Value = Me.Metin0.Value
End Sub

kodunu yaz.Bu kodla bilgisayarın kullanıcı adını bulduğun fonksiyonun döndürdüğü değeri tablodaki alana kaydetmiş olacaksın.Örneğini istediğin alana göre düzenlersin.
Eklediğim resimde fonksiyonun döndürdüğü alanı çalışma anında gizlersin.
resim

Örnek Ektedir Kolay Gelsin

Ek Dosyalar
cskn_windows user name.rar
[24.53 KB]

Serkan Hocam Pardon;Örneği hazırlamaya başlamıştım eklemek istedim boşa gitmesin




GERİ SAYIM;Sen doğduğunda başladı ! Eğer (9) canlı bile olsaydın en fazla (8) kez kaçabilirdin Ölümden ! Bil ki (7) Düvele sultan dahi olsan yerin (6) Mekan olacak sana. En fazla (5) Metre kumaş götürebileceksin ! Kapatacaksın (4) açsanda gözlerini ! Bu (3) günlük fani dünyada Azraile (2) kat olup yalvarsanda nafile EceL geldiğinde (1) gün öleceksin ! İşte, o an herşey (0) dan başlayacak. Çünkü,
ÖLÜM BİR YOK OLUŞ DEĞİL,YENİDEN DOĞUŞTUR !
Cevapla

erkanb

Aktif Üye
Kullanici Avatari
Aktif Üye
E.... B....
38
06/11/2009
0
Tekirdağ
Ofis 2003
09/07/2013,17:43
Çözüldü 
Cevabınız için çok teşekkür ederim. eke tıkladığımda resim.accesstr.net adresine yönlendiriyor ve indir dediğimde sayfa açılamıyor. O siteye farklı bir kayıtmı yapmam gerekiyor?


erkanb, 06-11-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Coskun0559

Uzman
Kullanici Avatari
Uzman
C.... Ç....
1.221
02/11/2008
511
Tekirdağ
-
02/02/2018,17:23
Çözüldü 
siteden indirmek için üye olmanıza gerek yok.


GERİ SAYIM;Sen doğduğunda başladı ! Eğer (9) canlı bile olsaydın en fazla (8) kez kaçabilirdin Ölümden ! Bil ki (7) Düvele sultan dahi olsan yerin (6) Mekan olacak sana. En fazla (5) Metre kumaş götürebileceksin ! Kapatacaksın (4) açsanda gözlerini ! Bu (3) günlük fani dünyada Azraile (2) kat olup yalvarsanda nafile EceL geldiğinde (1) gün öleceksin ! İşte, o an herşey (0) dan başlayacak. Çünkü,
ÖLÜM BİR YOK OLUŞ DEĞİL,YENİDEN DOĞUŞTUR !
Cevapla

Coskun0559

Uzman
Kullanici Avatari
Uzman
C.... Ç....
1.221
02/11/2008
511
Tekirdağ
-
02/02/2018,17:23
Çözüldü 
örneği indirip inceleyebildiniz mi? sorunuz ile ilgili geri dönüşte bulunurmusunuz?


GERİ SAYIM;Sen doğduğunda başladı ! Eğer (9) canlı bile olsaydın en fazla (8) kez kaçabilirdin Ölümden ! Bil ki (7) Düvele sultan dahi olsan yerin (6) Mekan olacak sana. En fazla (5) Metre kumaş götürebileceksin ! Kapatacaksın (4) açsanda gözlerini ! Bu (3) günlük fani dünyada Azraile (2) kat olup yalvarsanda nafile EceL geldiğinde (1) gün öleceksin ! İşte, o an herşey (0) dan başlayacak. Çünkü,
ÖLÜM BİR YOK OLUŞ DEĞİL,YENİDEN DOĞUŞTUR !
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Mükerrer Kaydı Engelleme Allback 4 175 13/04/2018, 13:37 Allback
Çözüldü Yeni Yılda Kaydı 1Den Başlatma prestij06 8 364 30/11/2017, 23:38 prestij06
Çözüldü Formdaki Kaydı Farklı Formda Yeniden Kayıt U.ALTUN 11 547 19/10/2017, 17:29 U.ALTUN
Çözüldü Formdaki Kaydı Farklı Formda Yeniden Kayıt U.ALTUN 9 576 04/10/2017, 19:53 ozanakkaya
Çözüldü Geçerli Kaydı Mail Atma Hk. serkan1985 6 389 25/08/2017, 09:02 serkan1985

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.
 
 
Forum use Krzysztof "Supryk" Supryczynski addons.