11/09/2018, 09:16
hbal09
Merhabalar,
Başlıktan yaşadığım problemi ne kadar anlatabildim bilemiyorum. Yaşadığım problem şu, full sürümde (2016) hazırladığım Access Veritabanımı diğer Access yüklü olmayan bilgisayarlarda Access 2016 Runtime ile kullanmak istediğimizde bir butonu çalıştıracağım zaman o buton bazı sorguları çalıştırdığı için normalde Access yüklü bilgisayarlarda istemci ayarlarından onayla tikini kaldırarak başa çıktığımız olay Runtime ile nasıl gerçekleştirilebilir.
bunun için ayrı bir modül mü gerekiyor acaba.
bazı yabancı sitelerde bazı cevaplar gördüm ama nasıl yaparım bilemedim, örneğin şöyle bir cevap var:
"You need to set any options via code and your own interface if you want to expose that to the user.
In this case you'd use the setoption method of the application object:
Application.SetOption("Move After Enter") = value
Where value is don't move (0), next field (1), or next record (2)
bir başka sitede ise şöyle bir çözüm sunmuşlar:
Use the
method. You can use
for the
, or set an object variable to
and use
from that variable:
The object variable approach allows you to check
and to get the last-used autonumber value* see below:
Also
is flexible in that it will accept either the name of a saved query (as above) or a Sql statement. So you could do something like this ...
* The autonumber value used by the last
executed from that object variable.
nasıl bu problemi çözerim, işin içinden çıkamadım. ekteki örnek üzerinde açıklayabilecek biri olursa çok memnun olurum.
Başlıktan yaşadığım problemi ne kadar anlatabildim bilemiyorum. Yaşadığım problem şu, full sürümde (2016) hazırladığım Access Veritabanımı diğer Access yüklü olmayan bilgisayarlarda Access 2016 Runtime ile kullanmak istediğimizde bir butonu çalıştıracağım zaman o buton bazı sorguları çalıştırdığı için normalde Access yüklü bilgisayarlarda istemci ayarlarından onayla tikini kaldırarak başa çıktığımız olay Runtime ile nasıl gerçekleştirilebilir.
bunun için ayrı bir modül mü gerekiyor acaba.
bazı yabancı sitelerde bazı cevaplar gördüm ama nasıl yaparım bilemedim, örneğin şöyle bir cevap var:
"You need to set any options via code and your own interface if you want to expose that to the user.
In this case you'd use the setoption method of the application object:
Application.SetOption("Move After Enter") = value
Where value is don't move (0), next field (1), or next record (2)
bir başka sitede ise şöyle bir çözüm sunmuşlar:
Use the
Kod:
DAO.Database.ExecuteKod:
CurrentDbKod:
DAO.DatabaseKod:
CurrentDbKod:
.ExecuteKod:
Dim db As DAO.Database
Set db = CurrentDb
db.Execute "overdue_Query", dbFailOnErrorKod:
db.RecordsAffectedKod:
Debug.Print db.OpenRecordset("SELECT @@Identity")(0)Kod:
.ExecuteKod:
Dim strDelete As String
strDelete = "DELETE FROM tblFoo;"
db.Execute strDelete, dbFailOnError
MsgBox db.RecordsAffected & " records deleted"* The autonumber value used by the last
Kod:
INSERTnasıl bu problemi çözerim, işin içinden çıkamadım. ekteki örnek üzerinde açıklayabilecek biri olursa çok memnun olurum.