Kişi bilgileri gizlidir. Logo çalışanları görebilir.

LOD içerisinden dll çağırma

  Tiger/Logo Object Designer (LOD)

Uyarlama içerisine yazmış olduğum dll nasıl ekleyebilirim


LOD DLL


NaciO

LOD içerisinden çağıralacak dll dosyaları COM dll olmalıdır. Çağırmak için kullandığımız metod OleObject metodur. Bu metodu kullanarak late binding yöntemi ile istediğiniz COM nesnesini çağırabilirsiniz.

Aşağıdaki örneklerde ADO nesnesinin nasıl çağırıldığı, diğer örnekte ise Logo Objects'in harici bir dll gibi nasıl çağırıldığı yer almaktadır.

try
  conn = OLEObject("adodb.connection")
  conn.Mode = 3
  conn.ConnectionTimeout = 15
  conn.CommandTimeout = 30
  conn.Open ("Provider=sqloledb;Data Source=ServerName; Initial Catalog=DbName;User ID=UserId;Password=UserPsw;")
catch
  Warn("Sunucu bağlantısı sağlanamadı!.Baglantıyı kontrol edip tekrar deneyiniz.")
  exit sub
End try
UnityApp = OleObject("UnityObjects.UnityApplication")
res = UnityApp.Login("Logo", "",1)

dataObj = UnityApp.NewDataObject(30)
dataObj.New()
dataObj.DataFields.FieldByName("ACCOUNT_TYPE").Value=3
dataObj.DataFields.FieldByName("CODE").Value="LOD3"
If dataObj.Post() Then
   warn("post ok")
Else
   warn("post false")
End If

dataObj=null
UnityApp.Disconnect()
UnitpApp = null





26/12/16 09:16

Cevap vermek için giriş yapmanız gerekmektedir.