muratboy31

ben ams de böyle bir örnek varmıdır diye sordum ?

Merhaba üstadlar,   Daha önce tcmb den kur çekme gibi bir örnek yapan oldumu ?   Teşekürler

Aslında tam olarak bu değil sanırım ben yanlış anlattım; Şöyle anlatmayı deneyim, benim istediğim admin, moderator, super user, normal user gibi kullanıcılar belirleyip belli yetkiler verebilmek ve yetkiye göre içerik görüntülemesini sağlamak. Ayrıca daha sonra kullanıcının yetkisi değişebilir, veritabanından tek tek silmektense bunu daha kolay bir şekilde yapıyor olmam lazım...

Arkadşlar merhaba,   Merak ettiğim bir konu var,    veri tabanında hangi kullanıcının hangi bilgileri kullanacağını nasıl belirleriz, şöyleki;   diyelimki tabloda 3 adet veri var   veri1  -->mehmet görsün veri2  -->mehmet görmesin, ali görsün veri3  -->sadece veli görsün   bundaki mantık nedir ? yane bunu veri tabanında farklı tablolara mı yazıyoruz her kullanıcı için, yoksa tek tabloda kullanıcı ayrımı yapabiliyormuyuz ?   Teşekürler

HTTP.Download("http://www.ipchicken.com/", _TempFolder .. "\\tempfile", MODE_TEXT); error = Application.GetLastError(); if (error == 0) then     page = TextFile.ReadToString(_TempFolder .. "\\tempfile");     File.Delete(_TempFolder .. "\\tempfile", false, false, true);     ip = string.sub(page, string.find(page, '%d+%.%d+%.%d+%.%d+'));     if (ip ~= nil) then         error = 0;   Dialog.Message("", "Ip adresim: "..ip..")  end end

teşekürler turkoglu98 sorunu çözdüm geçen hafta, kullanıcıda yazma iznini kaldırmışım.

Sanıyorum registry ile de yapılabilir...

Masklı inptu veri tabanına nasıl kayıt edebilir ? Text olarak gitmiyor !

evet hata oradaymış, teşekürler... buarada 3-4 bağlanıp dosya çekmeye kalktığı için kapattım pc yi :)

365 618 384 8057

Yine aynı !

onu SQlite ile yapmıştın daha önce Mysql de olmuyor !

bu konu ile ilgili bir fikri olan varmı acaba ?   seri aynı olmasına rağmen uyarı mesajı vermiyor ?   a = Input.GetText("adi"); b = Input.GetText("soyadi"); c = Input.GetText("cihaz"); d = Input.GetText("marka"); e = Input.GetText("model"); f = Input.GetText("seri"); MysqlQuery = MySQLConnection:execute("SELECT * FROM demirbas where seri='"..f.."'"); goster = MySQLCursor:fetch({},"a"); if goster ~= nil then Dialog.Message("Uyarı", "Bu Seri No Daha Önceden Kayıt Edilmiş !", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1); else MysqlQuery = MySQLConnection:execute("INSERT INTO demirbas(adi, soyadi, cihaz, marka, model, seri) VALUES ('"..a.."','"..b.."','"..c.."','"..d.."','"..e.."','"..f.."')"); Dialog.Message("Eklenedi!", "Bilgiler Eklendi!", MB_OK, MB_ICONINFORMATION) Page.Jump("Page1"); end

Hayır olmadı, ayrıca kırmızı ile işaretlediğim yeri de düzelttim, ilginç !   a = Input.GetText("adi"); b = Input.GetText("soyadi"); c = Input.GetText("cihaz"); d = Input.GetText("marka"); e = Input.GetText("model"); f = Input.GetText("seri");         MysqlQuery = MySQLConnection:execute("SELECT * FROM demirbas where seri=".."'"..f.."'");       goster = MySQLCursor:fetch();          if goster ~= nil then        Dialog.Message("Uyarı", "Bu Seri No Daha Önceden Kayıt Edilmiş !", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);       else        MysqlQuery = MySQLConnection:execute("INSERT INTO demirbas(adi, soyadi, cihaz, marka, model, seri) VALUES ('"..a.."','"..b.."','"..c.."','"..d.."','"..e.."','"..f.."')");        Dialog.Message("Eklenedi!", "Bilgiler Eklendi!", MB_OK, MB_ICONINFORMATION)        Page.Jump("Page1");       end

Yine uyarı vermedi !

seri aynı olmasına rağmen uyarı mesajı vermiyor neyi eksik yapıyorum acaba ?   a = Input.GetText("adi"); b = Input.GetText("soyadi"); c = Input.GetText("cihaz"); d = Input.GetText("marka"); e = Input.GetText("model"); f = Input.GetText("seri");       MysqlQuery = MySQLConnection:execute("SELECT * FROM demirbas where seri='"..f.."'");       goster = MySQLCursor:fetch({},"a");              if goster ~= nil then        Dialog.Message("Uyarı", "Bu Seri No Daha Önceden Kayıt Edilmiş !", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);       else        MysqlQuery = MySQLConnection:execute("INSERT INTO demirbas(adi, soyadi, cihaz, marka, model, seri) VALUES ('"..a.."','"..b.."','"..c.."','"..d.."','"..e.."','"..f.."')");        Dialog.Message("Eklenedi!", "Bilgiler Eklendi!", MB_OK, MB_ICONINFORMATION)        Page.Jump("Page1");       end

Teşekürler   target_text = String.Find(ComboBox.GetItemText("ComboBox2", ComboBox.GetSelected("ComboBox2")), " ", 1, false); text1 = String.Mid(ComboBox.GetItemText("ComboBox2", ComboBox.GetSelected("ComboBox2")), 1, target_text); text2 = String.Mid(ComboBox.GetItemText("ComboBox2", ComboBox.GetSelected("ComboBox2")), target_text +1, -1);

teşekürler pairs   bir sorum daha var, comboboxta adı ve soyadı kısmını beraber gösteriyorum fakat on combobox select olayında adi ve soyadı kombinasyonu ile çalışıtramadım ! ombobox taki stringi ayırmak gerekiyor kerkaldeyada başka yolu varmı ?   on show : ComboBox.AddItem("ComboBox1", satir.adi.." "..satir.soyadi, "");   on combobox select: MySQLCursor, err = MySQLConnection:execute("SELECT adi,soyadi,cihaz,marka,model,seri FROM demirbas WHERE adi='"..ComboBox.GetItemText("ComboBox1", ComboBox.GetSelected("ComboBox1")).."' and soyadi='"..ComboBox.GetItemText("ComboBox1", ComboBox.GetSelected("ComboBox1")).."'");

İzledim onu fakat update işlemi nasıl yapılıyor bulamadım, herhangi bir örnek yada kod varmı onunla ilgili... veri tabanındaki bir bilgiyi update etmek istiyorum.

Özellikle farklı konular açıyorum ki başka insanlarda arama yaptığında başlığı görüp yararlansın, bir başlık altında 20 tane farklı soru sorarsam kimse ne olduğunu anlamazki...

Merhaba arkadaşlar, Select olayını yaparken bir hata ile karşılaşıyorum kullandığım kod şöyle ; MySQLCursor, err = MySQLConnection:execute("SELECT adi,soyadi,cihaz,marka,model,seri FROM demirbas where id='1'"); adi,soyadi,cihaz,marka,model,seri = MySQLCursor:fetch(); Input.SetText("adi", adi); Input.SetText("soyadi", soyadi); Input.SetText("cihaz", cihaz); Input.SetText("marka", marka); Input.SetText("model", model); Input.SetText("seri", seri);

Buldum, teşekürler.   MySQLConnection, err = MySQL:connect("deneme", "user", "pass", "172.16.1.2"); MySQLCursor, err = MySQLConnection:execute("SELECT * FROM demirbas"); satir = MySQLCursor:fetch({},"a"); while satir do ComboBox.AddItem("ComboBox1", satir.adi, ""); satir = MySQLCursor:fetch(satir,"a"); end

Merhaba arkadaşlar, Mysql veri tabanındaki bilgiyi combobox a nasıl populate edebilirim acaba ? MySQLConnection, err = MySQL:connect("deneme", "user", "pass", "172.16.1.2"); Mesela adi kolonunun comboboxta listelenmesini istiyorum: