cari bilgileri getirmek

   cari kodunu bildigim bir carinin bilgilerini getirmek istiyorum..Kodum söyle ve gerisini getiremedim yardimlarinizi bekliyorum..

Kernel kernel = new Kernel();
    Sirket sirket = default(Sirket);
    Cari cari = default(Cari);
    CariTemelBilgi cariTmlBlg = default(CariTemelBilgi);
    CariEkBilgi cariEkBlg = default(CariEkBilgi);

        cariTemel.CARI_KOD = Session["cKod"].ToString();
        sirket = NetsisKernel.yeniSirket(NetOpenX40.TVTTipi.vtMSSQL, "GUNSU",    "TEMELSET", "", "Netsis", "Net1", 0);

        cari =kernel.yeniCari(sirket);
        cariTmlBlg = cari.TemelBilgi();
        cariEkBlg = cari.EkBilgi();

cari kodunu verip geri dönüsünde cari adresini alabilecegim kod satiri lazim..

Yazar	Mesaj Konu Arama Topic Seçenekleri Yanıt Yaz Yeni Konu Oluştur Konuyu Yazdır Çeviri Konu
amanbre Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 16 Kasım 2008 Konum: Antalya Durum: Aktif Değil Puanlar: 0	Mesaj Seçenekleri Yanıt Yaz Alıntı amanbre Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Konu: cari bilgileri getirmek Gönderim Zamanı: 16 Kasım 2008 Saat 16:04
	cari kodunu bildigim bir carinin bilgilerini getirmek istiyorum..Kodum söyle ve gerisini getiremedim yardimlarinizi bekliyorum.. Kernel kernel = new Kernel(); Sirket sirket = default(Sirket); Cari cari = default(Cari); CariTemelBilgi cariTmlBlg = default(CariTemelBilgi); CariEkBilgi cariEkBlg = default(CariEkBilgi); cariTemel.CARI_KOD = Session["cKod"].ToString(); sirket = NetsisKernel.yeniSirket(NetOpenX40.TVTTipi.vtMSSQL, "GUNSU", "TEMELSET", "", "Netsis", "Net1", 0); cari =kernel.yeniCari(sirket); cariTmlBlg = cari.TemelBilgi(); cariEkBlg = cari.EkBilgi(); cari kodunu verip geri dönüsünde cari adresini alabilecegim kod satiri lazim..

pirodex Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 12 Şubat 2009 Durum: Aktif Değil Puanlar: 0	Mesaj Seçenekleri Yanıt Yaz Alıntı pirodex Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Gönderim Zamanı: 12 Şubat 2009 Saat 11:00
	Dim Kernel As New NetOpenX40.Kernel Dim Sirket As NetOpenX40.Sirket Dim Cari As NetOpenX40.Cari Dim CariTemel As NetOpenX40.CariTemelBilgi Dim CariEk As NetOpenX40.CariEkBilgi Sirket = Kernel.yeniSirket(TVTTipi.vtMSSQL, "FAYDA09", "TEMELSET", "", "NETSIS", "NET1", 0) Cari = Kernel.yeniCari(Sirket) CariTemel = Cari.TemelBilgi CariEk = Cari.EkBilgi Try If Cari.kayitOku(otAc, "CASABIT.CARI_KOD='aranilan_cari_kodu_buraya'") Then 'Cari.kayitOku(otIlk) 'MsgBox("kayit açildi") 'Cari.kayitOku(otIlk) Cari.kayitOku(otIlk) MsgBox(Cari.TemelBilgi.CARI_KOD & " --- " & Cari.TemelBilgi.CARI_ISIM & " --- " & Cari.EkBilgi.CARI_KOD & " ") 'Cari.kayitOku(otSonraki) 'MsgBox(Cari.TemelBilgi.CARI_KOD & " --- " & Cari.TemelBilgi.CARI_ISIM & " " & Cari.TemelBilgi.RISK_SINIRI & " " & Cari.RiskBul(True, TCariRiskTipi.crtBorcToplam, Cari.TemelBilgi.CARI_KOD, System.DateTime.Now, "", "").ToString()) 'Cari.kayitOku(otSonraki) 'MsgBox(Cari.TemelBilgi.CARI_KOD & " --- " & Cari.TemelBilgi.CARI_ISIM) 'Cari.kayitOku(otOnceki) 'MsgBox(Cari.TemelBilgi.CARI_KOD & " --- " & Cari.TemelBilgi.CARI_ISIM) 'Cari.kayitOku(otSon) 'MsgBox(Cari.TemelBilgi.CARI_KOD & " --- " & Cari.TemelBilgi.CARI_ISIM) End If Sirket = Nothing Cari = Nothing CariTemel = Nothing CariEk = Nothing Call Kernel.FreeNetsisLibrary() Kernel = Nothing Catch ex As Exception End Try

gazimuhtar Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 21 Ağustos 2009 Konum: Mardin Durum: Aktif Değil Puanlar: 0	Mesaj Seçenekleri Yanıt Yaz Alıntı gazimuhtar Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Gönderim Zamanı: 24 Ağustos 2009 Saat 14:02
	bu bilgileri gosterirken textbox yada baska bir sey kullanmiyormusunuz bunlar sadece kotlar datagrid yada datagridwiev filan eger bole cok basit de olsa bir sadece kodlarini degilde tasarim sayfasi ile birlikte bir ornek atilirsa cok daha fayadali olacagina inaniyorum rapid e upload edip linkini verirseniz sevinirim ben visual 2008 kullaniyorum
	KONTROLSUZ GÜÇ GÜÇ DEĞİLDİR