Skip to main content

AccessTr.neT


Kapsamlı Örnek. (kamu Kurumunda Araç Görevlendirme)

Kapsamlı Örnek. (kamu Kurumunda Araç Görevlendirme)

Brick #1
Resmi kurumlarda kullanılan kapsamlı araç görevlendirme programı. Access ile ilgilenenlerin çok faydalanacağını umarım. Bu program ile birlikte Access ile çok kapsamlı  programlar yapılabildiğini görmenizi istedim. Access her ne kadar veritabanı ise de orta ölçekli her türlü ihtiyacı programlama imkanına sahipsiniz. 

Programı daha iyi anlayabilmek ve program ile ne gibi fonksiyonları tanımlanabildiğini göre bilmek için aşağıdaki kullanıcı bilgileri ile giriş yaptıktan sonra yeni kullanıcı tanımlaması yapalım ve yetki seviyesini ise 2 veya üzeri olarak belirleyelim. Bu durumda, yetki tanımlaması ile ilgili bilgi sahibi olabilir ve bunu kendi programlarınızda kullanabilirsiniz.

İyi Çalışmalar.
.rar Arac_görevlendirme.rar (Dosya Boyutu: 393,22 KB | İndirme Sayısı: 124)
Son Düzenleme: 17/09/2018, 16:40, Düzenleyen: istemihan.
Cevapla
#2
Giriş için
Kullanıcı adı:deneme
şifre :1234
Cevapla
#3
Paylaşım için teşekkürler.
Cevapla
#4
Paylaşım için teşekkürler dosyayı indirdim lakin giriş yapamıyorum kontrol etmeniz mümkünmüdür.
Cevapla
#5
(17/09/2018, 11:09)Kılıçarslan yazdı: Paylaşım için teşekkürler dosyayı indirdim lakin giriş yapamıyorum kontrol etmeniz mümkünmüdür.

64 bit ofis kullanıyorsanız Module2 isimli modüldeki


Private Declare Function BlackEagle Lib "kernel32.dll" Alias "GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal lpVolumeNameBuffer As _
String, ByVal nVolumeNameSize As Integer, lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, lpFileSystemFlags As Long, ByVal _
lpFileSystemNameBuffer As String, ByVal nFileSystemNameSize As Long) As Long


kodundaki Declare ile Function arasına PtrSafe ekleyerek deneyiniz. Kod aşağıdaki gibi olacak.


Private Declare PtrSafe Function BlackEagle Lib "kernel32.dll" Alias "GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal lpVolumeNameBuffer As _
String, ByVal nVolumeNameSize As Integer, lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, lpFileSystemFlags As Long, ByVal _
lpFileSystemNameBuffer As String, ByVal nFileSystemNameSize As Long) As Long
Cevapla
#6
64 bit de çalışması için verdiğiniz düzenlemeyi sizin yönlendirmenizle yaptım fakat bu bölümde sabit kalıyor resimdeki gibi

[Resim: aYbrBB.png]
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da