Ağda kullanılan bu program da evrak kayıt girişi yapılmakta, program üzerinden sayı alınıp kaydedilmekte, o yüzden her seferinde tek kullanıcının kullanabilmesi gerekiyor.Teşekkür ederim.
Başka bir forumda bir arkadaşın aşağıdaki gibi bir yardımı olmuştu ama Access işlev hatası verdi.
Option Compare Database
Public Function trz()
yol = "D:\Paylaşım\Kayıt.ldb"
If Dir(yol) <> "" Then
evn = FreeFile
Open yol For Input As #evn
Do Until EOF(evn)
Line Input #evn, kullanici
yaz = yaz & kullanici
Loop
Close evn
MsgBox "Dosya şu anda aşağıdaki kişi/kişiler tarafından kullanılmaktadır. " & vbCrLf & vbCrLf & yaz, 64, "VBA"
End If
End Function
Bu fonksiyonu Access açılışında otomatik çalışan makroya (Autoexec) kaydettim ancak aşağıdaki hataları verdi.
Son Düzenleme: 23/12/2015, 10:44, Düzenleyen: neyzen006.
(Sebep: değişiklik)