Dll Çağırma - Okuma Ve Listeleme

[dragon3781]

Merhaba ;

Öncelikle Elimde Örnek Çalışma olmadığı için ( Nereden Başlayacagımı Bulamadım ) sadece açıklamalı resim koymak zorunda kaldım , konu kurallara aykırı ise silinebilir.

[b]Sorum :[/b] AMS nesneleri ile yada Plugins - Objects vs.. Kullanarak " .dll dosyalarını çağırıp - listeletip - içeriğini okutabilirmiyiz " acaba ?

Örnek Resim ;

[img]http://www.tnctr.com/uploads/imgs/pre_1333117694__dll.jpg[/img]

Açıkcası Dll okutmak ve listelemek için Dll kullanayım diye düşündüm , onunda dll adını bilmiyorum

Yardımcı olabilirseniz sevinirim.

Edited March 30, 2012 by dragon3781

[nightmare3519]

Valla yapsa yapsa KintaRo abi yapar bunu

[DivaneTR]

[b]KintaRo yapamaz [/b]

[nightmare3519]

[quote name='Baba_' date='30 March 2012 - 17:58 ' timestamp='1333119497' post='1177696']
[b]KintaRo yapamaz [/b]
[/quote]

Getir gaza getir KintaRo abi sen yaparsın en büyük sensin en birinci sensin ! :D
Gaza getirme diyom bide

Edited March 30, 2012 by nightmare3519

[El-Arabi]

Ugraşmak lazım.Olmaz diye birşey yok illaki bir yöntemle yapılabilir yani.

Edited March 30, 2012 by El-Arabi

[DivaneTR]

[quote name='El-Arabi' date='30 March 2012 - 18:04 ' timestamp='1333119892' post='1177704']
Ugraşmak lazım.Olmaz diye birşey yok illaki bir yöntemle yapılabilir yani.
[/quote]

[b]Niye AMS ile herşey yapılabiliyor mu ki ?[/b]

[El-Arabi]

Ams ile demedimki ek birşey ile yapılabilir mesela yardımcı bşr program ile.

[DivaneTR]

[b]Sen AMS ile dememiş olabilirsin ama bulunduğumuz bölüm ve konuyu açan kişinin sorusu AMS üzerine [/b]

[El-Arabi]

Baba_ yanlış anladın mesela bir program düşün bir dll i açıp verilerini bir texte export edebiliyor ve bu program parametre ile çalışıyor.Ams de File.Run le bu programı çalıştırıp verileri bir texte export edip oradan çektirdiğin zaman yardımcı program sayesinde ams ye veri çekmiş olmazmısın.

[DivaneTR]

[quote name='El-Arabi' date='30 March 2012 - 18:49 ' timestamp='1333122550' post='1177739']
Baba_ yanlış anladın mesela bir program düşün bir dll i açıp verilerini bir texte export edebiliyor ve bu program parametre ile çalışıyor.Ams de File.Run le bu programı çalıştırıp verileri bir texte export edip oradan çektirdiğin zaman yardımcı program sayesinde ams ye veri çekmiş olmazmısın.
[/quote]

[b]Öyle belki olabilir. Mesajında daha açık olsaydın yanlış anlamazdım.[/b]

[El-Arabi]

Benb ir örnek hazırlayıp sunacagım birazdan.

[El-Arabi]

Buyurun arkadaşlar ufak bir örnek geliştirilebilir.

http://www.mediafire.com/download.php?gc9le1x57j6phvm

[KintaRo]

El-Arabi'nin izlediği yol doğru ama eksik bilgi göndermiş exe'ye o yüzden fonksiyonları alamıyor, kodlar şu şekilde olmalı:

[codebox]result = File.Run("AutoPlay\\Docs\\dllexp.exe", "/from_files \"" .. _SourceFolder .. "\\Autoplay\\Docs\\CpuInfo.dll\" /sxml \"" .. _SourceFolder .. "\\Autoplay\\Docs\\functions.xml\"", "AutoPlay\\Docs", SW_HIDE, false);
Application.Sleep(500);

XML.Load("AutoPlay\\Docs\\functions.xml");
count = XML.Count("exported_functions_list","item");
XML.Delimiter = "|";
for i=1,count do
deger = XML.GetValue("exported_functions_list/item|"..i.."/function_name");
result = ListBox.AddItem("ListBox1",deger, "");
end[/codebox]

[dragon3781]

Peki bunu döngü ile komutlara dosya adını vermeden secileni export edip komutu getir deme imkanımız varmıdır ?

Secilen Dll lin okumasını yapıp export edip komutlarını listeye yazacak.

[KintaRo]

bir gözat buttonu yapin, dosyayı seçtiğinizde gelen veriyi

[quote]File.Run("AutoPlay\\Docs\\dllexp.exe", "/from_files \"" .. gelen_dosya_yolu .. "\" /sxml \"" .. _SourceFolder .. "\\Autoplay\\Docs\\functions.xml\"", "AutoPlay\\Docs", SW_HIDE, false);[/quote]

şeklinde uygulayın.

edit: ben yanlış anladım heralde, dosyayı gösterip yapayım dediniz zannettim, neyse ona göre düzeltirsiniz

[dragon3781]

Merhaba ;

Proje olmaya başladı fakat ;

[img]http://www.tnctr.com/uploads/imgs/pre_1333355885__dlll.jpg[/img]

[b]Page 1 ( On Show )[/b]

[code]
tAra = File.Find("AutoPlay\\Docs", "*.dll", false, true, nil, nil)
if tAra then
for i,v in pairs(tAra) do
ListBox.AddItem("ListBox2", String.SplitPath(v).Filename, v)
end
end

[/code]

[b]ListBox2 ( On Select )[/b]

[code]

result = File.Run("AutoPlay\\Docs\\dllexp.exe", "/from_files \"" .. _SourceFolder .. "\\Autoplay\\Docs\\*.dll\" /sxml \"" .. _SourceFolder .. "\\Autoplay\\Docs\\functions.xml\"", "AutoPlay\\Docs", SW_HIDE, false);
Application.Sleep(500);

XML.Load("AutoPlay\\Docs\\functions.xml");
count = XML.Count("exported_functions_list","item");
XML.Delimiter = "|";
for i=1,count do
deger = XML.GetValue("exported_functions_list/item|"..i.."/function_name");
result = ListBox.AddItem("ListBox1",deger, "");
end

[/code]

ListBox 1 e veriler her defasında aynı dosyanın ıcerıgı gelıyor .
ListBox2 de sectigim dosyanın verileri gelmıyor.

Hata yaptıgım kısım "\\Autoplay\\Docs\\*.dll\" burasımı acaba ?

Edited April 2, 2012 by dragon3781

[KintaRo]

[quote]result = File.Run("AutoPlay\\Docs\\dllexp.exe", "/from_files \"" .. ListBox.GetItemData(this) .. "\" /sxml \"" .. _SourceFolder .. "\\Autoplay\\Docs\\functions.xml\"", "AutoPlay\\Docs", SW_HIDE, false);
Application.Sleep(500);

XML.Load("AutoPlay\\Docs\\functions.xml");
count = XML.Count("exported_functions_list","item");
XML.Delimiter = "|";
for i=1,count do
deger = XML.GetValue("exported_functions_list/item|"..i.."/function_name");
result = ListBox.AddItem("ListBox1",deger, "");
end
[/quote]

bu şekilde deneyin.

[NotToday]

@dragon bilgisayarım dün arızalandı.Yapılınca senin meseleyle ilgilencem.

[dragon3781]

Hata verdi Kintaro Kodları deneyince ;

[img]http://www.tnctr.com/uploads/imgs/pre_1333360102__hata.jpg[/img]

Bir yerde hatamı yaptım :S

[nightmare3519]

[quote name='KintaRo' date='02 April 2012 - 11:58 ' timestamp='1333357100' post='1179562']
bu şekilde deneyin.

result = File.Run("AutoPlay\\Docs\\dllexp.exe", "/from_files \"" .. [b]ListBox.GetItemData(this)[/b] .. "\" /sxml \"" .. _SourceFolder .. "\\Autoplay\\Docs\\functions.xml\"", "AutoPlay\\Docs", SW_HIDE, false);
Application.Sleep(500);

XML.Load("AutoPlay\\Docs\\functions.xml");
count = XML.Count("exported_functions_list","item");
XML.Delimiter = "|";
for i=1,count do
deger = XML.GetValue("exported_functions_list/item|"..i.."/function_name");
result = ListBox.AddItem("ListBox1",deger, "");
end

[/quote]

Bu kalın yazdığım yer ListBox.GetItemData("ListBox1", this) olacak galiba

Ama denedim yine bir değişiklik yok

Edited April 2, 2012 by nightmare3519

[dragon3781]

benimde aklıma o geldı denedim aynısını , hatta this kaldırıp denedim gene olmadı.

[KintaRo]

pardon, ams yi açmadan yazmıştım,

ListBox.GetItemData(this)

yerine

ListBox.GetItemData(this, ListBox.GetSelected(this))

yazın

[nightmare3519]

[quote name='KintaRo' date='02 April 2012 - 14:46 ' timestamp='1333367160' post='1179647']
pardon, ams yi açmadan yazmıştım,

ListBox.GetItemData(this)

yerine

ListBox.GetItemData(this, ListBox.GetSelected(this))

yazın
[/quote]

Abi yine değişen bişey yok :S

[KintaRo]

o zaman başka bir sorun var şu proje dosyasını versenize bi?

[nightmare3519]

http://www.mediafire.com/?l3r6022wba2plfg