muratboy31

Yane AMS'de Mssql nasıl bağlanılır, tablo dan veri nasıl çekilir gibi...

Merhaba arkadaşlar   MSSQL bağlantısı konusunda yardımcı olabilecek varmı ?

Bu şekilde eğer dosya yoksa 101 i devredışı bırakır... MenuKontrol = INIFile.GetValue(_ProgramFilesFolder.. "\\Alt F4\\Database\\Settings.ini", "Menu Settings", "Start"); PassKontrol = File.DoesExist(_ProgramFilesFolder.. "\\Alt F4\\Database\\Alt F4.ini"); if MenuKontrol == "StartUp" and PassKontrol == true then     tblMenu = Application.GetMenu();     tblMenu[1].SubMenu[3].Enabled = false;     Application.SetMenu(tblMenu); elseif MenuKontrol == "NonStartUp" and PassKontrol == true then     tblMenu = Application.GetMenu();     tblMenu[1].SubMenu[4].Enabled = false;     Application.SetMenu(tblMenu); elseif PassKontrol == false and MenuKontrol == "NonStartUp" then     tblMenu = Application.GetMenu();     tblMenu[1].SubMenu[1].Enabled = false;     tblMenu[1].SubMenu[4].Enabled = false;     Application.SetMenu(tblMenu); end ama yukarıda da dediğim gibi, koşulda eksiklik varsa ekleyebilirsin, kod çalışıyor çünkü...   Ayrıca eğer buda olmadı diyorsan bence senin koşulda yanlışlık var ozaman, birde şöyle anlatmayı dene;   eğer dosya varsa ve nonstartup sa bunu yap eğer dosya varsa ve startup sa bunu yap eğer dosya yoksa ve nonstartup sa bunu yap eğer dosya yoksa ve startup sa bunu yap gibi...

Tamamda sen dosyayı yanlış yere koyuyuorsundur o yüzden dosyayı bulmadığı için menu bar devredışı oluyor... :)   PassKontrol = File.DoesExist(_ProgramFilesFolder.. \\Alt F4\\Database\\Alt F4.ini);  bu dosyanın doğru yerde olduğundan emin ol... çünkü yukarıda verdiğim kodda eğer bu dosya yoksa menuyu pasif et var...

İstediğin zaten o değilmiydi ?

Bu şekilde denermisin lütfen; MenuKontrol = INIFile.GetValue(_ProgramFilesFolder.. "\\Alt F4\\Database\\Settings.ini", "Menu Settings", "Start"); PassKontrol = File.DoesExist(_ProgramFilesFolder.. "\\Alt F4\\Database\\Alt F4.ini"); if MenuKontrol == "StartUp" and PassKontrol == true then tblMenu = Application.GetMenu(); tblMenu[1].SubMenu[3].Enabled = false; Application.SetMenu(tblMenu); elseif MenuKontrol == "NonStartUp" and PassKontrol == true then tblMenu = Application.GetMenu(); tblMenu[1].SubMenu[4].Enabled = false; Application.SetMenu(tblMenu); elseif PassKontrol == false then Application.SetMenuBarActive(false); end Eğer koşullarda eksik varsa düzenleyebilirsin...   Not : Ayrıca SourceFolder olarak kullanırsan daha iyi olur bence çünkü yol değişebilir...

ini dosyasını da dahil ederek projeyi yada bir ufak örneğini gönderirmisin bir bakarım istersen...

bu şekilde olmuyor mu ?   if MenuKontrol == "StartUp" and PassKontrol == true then

Hayır bunu denedim olmuyor,   lan_info=System.GetLANInfo(); strHost=lan_info.Host; File.RunAs("C:\\start.bat", "", "", SW_SHOWNORMAL, false, "user", "pass", strHost, LOGON_NO_OPTION, nil, nil);   yalnız şöyle birşey var ; bat dosyası bir java dosyası çalıştırıyor onun için sanırım shellexecute kullanmak gerekir yanlışmıyım ? şifre ve kullanıcı olayını shell execute ile nasıl yaparım

Ama ben domain kullanıcısı ile açıyorum kullanıcıların pc sini ve admin yetkisi olmadan güncellemeleri almıyor netten, normalde runas komutu ile yapabilirim ama bazen sıkıntı oluyor kısayolarla alakalı... o yüzden file.run çalışmaz diye tahmin ediyorum...

Domainde bulunan bir pc de domain kullanıcısı ile ufak bir bat dosyası çalıştırmam lazım local admin yetkisi ile bu kodu denedim ama aşağıdaki hatayı verdi; kullandığım kod bu : lan_info=System.GetLANInfo(); strHost=lan_info.Host; if File.DoesExist("C:\\start.bat") == true then AutoIt.RunAsSet("User", strHost, "Pass", 1) AutoIt.RunWait("C:\\start.bat", "", AUTOIT_SW_SHOWNORMAL) AutoIt.RunAsSet("", "", "", 1) else Dialog.Message("Uyarı", "Dosya bulunamadı !!!", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1); end EDIT: Runwait(@ComSpec & " /K " & @ScriptDir & "Start.bat", @ScriptDir & "data", @SW_SHOW) böyle birşey buldum ama bunu ams de nasıl kullanabilirim ? yada bu çalışır mı sizce ?

File.Run("cmd", "/C net use \\\\192.168.1.2\\folder /USER:muratboy31 123456", _WindowsFolder.."\\System32", SW_HIDE, false); File.Copy("AutoPlay\\Docs\\Test.Pdf", "\\\\192.168.1.2\\folder", true, true, false, true, nil);   bu şekilde çalıştı ama şöyle bir sorun çıktı... program kapanmıyor dosya attıktan sonra belli bir süre...

sanırım gerek kalmadı oldu gibi ama şöyle birşey fark ettim autoit plugin ile mapleme yaparken sorun oluyor sanırım mapleme olmadı taki ben manuel olarak network drive windows explorer da açana kadar...

Yanlış mı yapıyorum pairs ? olmadı...   Button code: AutoIt.DriveMapAdd("X:", "\\\\192.168.1.2\\folder", 0, "user", "pass") Numara = 1 local tbImg = Dialog.FileBrowse(true, "Locate File", _DesktopFolder, "Pictures (.png, .jpg, .tif)|*.png;*.jpg;*.tif|", "", "dat", false, false); if (tbImg[1] ~= "CANCEL") then local ext=String.SplitPath(tbImg[1]).Extension; File.Copy(tbImg[1], "X:\\resimler\\"..Numara.""..ext, true, true, false, true, kopyala); Image.Load("Image1", "X:\\resimler\\"..Numara..""..ext); end   Global code: function kopyala(FileTotal,FileCopied) if FileTotal == FileCopied then AutoIt.DriveMapDel("X:") end end  

AutoIt.DriveMapAdd("X:", "\\\\192.168.1.2\\folder", 0, "user", "pass") Numara = 1 local tbImg = Dialog.FileBrowse(true, "Locate File", _DesktopFolder, "Pictures (.png, .jpg, .tif)|*.png;*.jpg;*.tif|", "", "dat", false, false); if (tbImg[1] ~= "CANCEL") then local ext=String.SplitPath(tbImg[1]).Extension; File.Copy(tbImg[1], "X:\\resimler\\"..Numara.""..ext, true, true, false, true, nil); Input.SetText("Input1","\\\\192.168.1.2\\folder\\resimler\\"..Numara..""..ext); Image.Load("Image1", "X:\\resimler\\"..Numara..""..ext); end AutoIt.DriveMapDel("X:")    --- bu kodu kullandığımda dosya upload işi bitmeden map siliniyor, acaba upload bittikten sonra silmesini nasıl sağlarım ?

merhaba arkadaşlar, result = Dialog.FileBrowse(true, "Load File", _DesktopFolder, "Microsoft Word Document (*.doc)|*.doc|All Files (*.*)|*.*|", "", "", false, true); if (result[1] ~= "CANCEL") then Dialog.Message("Aşağıdaki dosya seçildi :", result[1]); end bunu path'i veri tabanına yazdırıyorum fakat geri çekerken listbox a böyle düşüyor \ slash lar kayboluyor, onları nasıl ekleyebilirim acaba ?

Tüm maplenmiş driveları nasıl listeleyebilirim acaba ?   AutoIt.DriveMapGet("X:")  sadece X değil de hepsini...

AMS 8 ile çalışan autoit plugin var mı acaba ?

Ams bu kadar mı zayıf bir dil !

öyle değil arkadaşım,   bu kullandığım NAS/SAN cihaz, ben zaten bilerek kullanıcı adı ve şifresi veriyorum ki herkes girip kurcalamasın...   Örnek;   Ip adresi : 192.168.1.2 klasör : photo kullanıcı : admin şifre : 123456   \\192.168.1.2\photo  yane...

ama kullanıcı adı ve şifre var bağlanmak için guest giriş yapamıyor...

Arkadaşlar merhaba, Öncelikle herkesin bayramı mübarek olsun...   Ben network te bulunan bir klasöre resim dosyasını atıp bunu mysql veri tabanına yolunu yazmak istiyorum, acaba daha önce böyle bir işlem yapan beni yönlendirebilir mi ?   Teşekürler

http://tr.rghost.net/47820620

Apz dosyasındaki tüm kod bu zaten :) başka hiçbir kod yok... ama yinede isterim dersen eklerim

Neden böyle bir hata alıyorum acaba ? Kullandığım kod bu ; HTTP.Download("http://www.tcmb.gov.tr/kurlar/today.html", _TempFolder .. "\\kur.txt", MODE_TEXT, 20, 80, nil, nil, nil) local kurlar = TextFile.ReadToString( _TempFolder .. "\\kur.txt") function kuralis(input, text, pos, lenght) kuralis = String.Find(kurlar, text, 1, false) kur = String.Mid(kurlar, kuralis + pos, lenght) Input.SetText(input, kur) end function kursatis(input, text, pos, lenght) kursatis = String.Find(kurlar, text, 1, false) kur = String.Mid(kurlar, kursatis + pos, lenght) Input.SetText(input, kur) end kuralis("Input1", "1 ABD DOLARI", 37, 6) kursatis("Input2", "1 ABD DOLARI", 52, 6) kuralis("Input3", "1 EURO", 37, 6) kursatis("Input4", "1 EURO", 52, 6)