Sistemci

  ams ile SQLite ile basit bir şey yapıla bilir küçük bir proje paylaş yardımcı olalım kardeşim

kardeşim altına url ekleyebilrsin resimlerin yada mediaplayer plungini kullanabilirsin

sadece sayı girmek için kardeşim diğerini anlamadım nasıl göndereceksin yazıcıya ne demek istedin onu açıklarsan yardımcı olmak isterim deger = Input.GetText("Input1") kontrol=String.ToNumber(deger) if (kontrol==0) then Dialog.Message("Uyarı","Lütfen sayı girin.") end

buyur kardeşim benim http://www.mediafire.com/?cw4xysc76olg7mn

kasa defteri olabilir abi alacak verecek yazabilir adam herşeyi cebine not eder ben kullanıyorum çokda hoş oluyor hatırlatmasıda oldumu ye ye bitmez :)

yok kardeşim malesef ok ve cancel var iki seçenek sadece

ee nasıl kullanacam peki kardeşim

sağol kardeşim benim yanlız serial istiyor kardeşim bu serial verebilir misin

selamün aleyküm arkadaşlar elinde olan arkadaşlar paylaşabilir mi programı elimdekini sildim şimdi bulamadım tşkler şimdiden

yazılım konusunda bende yardımcı olabilirim kardeşim

  kardeşim facebook la benim işim olmuyor kullanmıyorum TeamViewer verirsen bakabilirim yoksa facebook bana ters.

kardeşim istersen TeamViewer özelden yollarsan yardımcı olmaya çalışırım

evet kardeşim doğru verileri ay gun yil olarak tek tek çek bu kadar kolay şuan evdeyim proje yenımda yok teknik servis programı yazacam Allah nasip ederse sen vesile oldun paylaşınca görürsün gerekirse sana apz atarım kardeşim

  önemli değil kardeşim. garanti bölümünde kaydederken yazacaksın bu kodları kardeşim

Not Silme Butonu Kardeşim [spoiler]nSecilen = TreeList.GetSelected("liste1") -- secilene bak if nSecilen ~= -1 then -- eğer seçilen varsa nID = TreeList.GetCellText("liste1", 0, nSecilen) sSoru = Dialog.Message("Uyarı!", nID .. " Not Kaydı silinecektir! Devam etmek istiyor musunuz?", MB_YESNO, MB_ICONQUESTION, MB_DEFBUTTON2) -- soru sor if sSoru == IDYES then -- eğer evet tusuna basilirsa sql.baglan() SQLite3Connection:execute("DELETE FROM note WHERE id='" .. nID .. "'") sql.kapat() Page.Jump("Page1") -- sayfayi yenile end end sql.baglan() db, err = SQLite3Connection:execute("SELECT * FROM note"); tVeri = db:fetch({}, "a") TreeList.ClearRows("liste1") while tVeri do id = tVeri.id adi = tVeri.adi soyadi = tVeri.soyadi adres = tVeri.adres telefon = tVeri.telefon mail = tVeri.mail tarih = tVeri.tarih not_al = tVeri.nott TreeList.AddRow("liste1", id.."|"..adi .. "|" .. soyadi .. "|" .. adres .. "|" .. telefon .. "|" .. mail .. "|" .. tarih .. "|" .. not_al, nil, nil) tVeri = db:fetch(tVeri,"a"); end sql.kapat(); [/spoiler]   Garanti Silme Butonu [spoiler]nSecilen = TreeList.GetSelected("liste2") -- secilene bak if nSecilen ~= -1 then -- eğer seçilen varsa nID = TreeList.GetCellText("liste2", 0, nSecilen) sSoru = Dialog.Message("Uyarı!", nID .. " Arıza Kaydı silinecektir! Devam etmek istiyor musunuz?", MB_YESNO, MB_ICONQUESTION, MB_DEFBUTTON2) -- soru sor if sSoru == IDYES then -- eğer evet tusuna basilirsa sql.baglan() SQLite3Connection:execute("DELETE FROM garanti WHERE id='" .. nID .. "'") sql.kapat() end end sql.baglan() db, err = SQLite3Connection:execute("SELECT * FROM garanti"); TreeList.ClearRows("liste2"); tVeri = db:fetch({}, "a") while tVeri do id = tVeri.id urunsahibi = tVeri.urunsahibi telefon = tVeri.telefon markasi = tVeri.markasi uruntipi = tVeri.uruntipi serino = tVeri.serino servisadresi = tVeri.servisadresi servistelefon = tVeri.servistelefon gidistarihi = tVeri.gidistarihi gelistarihi = tVeri.gelistarihi gonderenkisi = tVeri.gonderenkisi TreeList.AddRow("liste2", id.."|"..urunsahibi .. "|" .. telefon .. "|" .. markasi .. "|" .. uruntipi .. "|" .. serino .. "|" .. servisadresi .. "|" .. servistelefon .. "|" .. gidistarihi .."|".. gelistarihi .."|" .. gonderenkisi, nil, nil) tVeri = db:fetch(tVeri,"a"); end sql.kapat();[/spoiler]

Buyur Kardeşim nerdeyse baştan yazdım bütün kodlarda hata vardı işallah işini görür http://www.mediafire.com/download/uhj612un133y582/Teknik_Servis_Programı.apz

biraz işlerim var yardım edecem kardeşim sabır

abi peki tarih olarak değilde saat olarak yapabilir miyiz . örneğin 5 dk dır bekliyor gibi abi

  Kardeşim Mantık olarak birşeyler üretemedim farklı bir konu varsa yardımcı olabilirim kardeşim

  önemli değil kardeşim sorun olursa yardıma hazırım hatalarla uğraşmak kendimi geliştirmeme sebep olduğu için sürekli burdayım

kardeşim tamamladım şuanda sorun yok gözüküyorda bir bak takıldığın yerde söyle yardımcı olayım kardeşim http://www.mediafire.com/download/nwjz3vjv3f2nth3/teknikservis_programi.apz

haklısın abi çok karışık ve bir anlamı olmayan harfler hata verse dahi neye dayanarak verdiğini bile bulamazsın bende senin kullandığın şekilde kullanıyorum çok kolay oluyor hatayı bulmak sorunu çözmek.

kardeşim yeniden düzenledim bakar mısın http://www.mediafire.com/download/3pp76l55mu8o76x/pc_sr.apz

Tnctr yazan kısmı Satış Sayfası olarak değiştirip . Page.Jump("Page1") sayfasına yönlendirmek istiyorum kardeşim

kardeşim ben düzelttim biraz bakarsan sevinirim elimden geldiğince yardım etmeye çalışırım kardeşim http://www.mediafire.com/download/dbjizzpsi8ndcdi/teknikservis.apz