ERP Nedir? Enterprise Resource Planning nasıl çalışır? İş süreçleri ile ilgili tüm soru ve cevapları ERPNe.org'da.
Ülkemizde hızla gelişmekte olan ERP yazılım sektörümüzün, Yerli ve Yabancı ERP işlemlerinin tanıtımı ve kullanıcılarının buluşma noktası olması hedefiyle kurulan sitemize hoş geldiniz. Ülkemizdeki Ne.org konseptinde bir ilk olarak yayın hayatına başlayan ERPNe.org, Kurumsal Kaynak Planlaması yazılımlarını kullananların bilgi kaynağı/Portal olmak amacı ile kurulmuştur. Genellikle yurt dışında büyük üreticiler tarafından geliştirilen SQL, Delphi, ASP, CSharp gibi teknolojilerin anlatıldığı sitelerin kullandıkları (WhatisSQL, WhatisASP) (Ülkemizde Netsis Nedir, Mikro Nedir, SAP Nedir yada Logo Nedir gibi kullanıcı sorularına) Ne ve nedir konseptinde yeni bir açılım olmasını da hedefleyen ERPNe.ORG' un, ülkemizin uluslararası ERP sektörü içinde hak ettiği yeri almasında ve ERP ürünlerini kullananların bir araya gelerek Yerli ERP'nin gelişmesine katkı sağlayacakları önemli bir kilometre taşı olacağı düşüncesindeyiz. |
Excel'e Çek Listesi Alma. |
Yanıt Yaz |
Yazar | |
unalh
Üye Kayıt Tarihi: 08 Ekim 2009 Durum: Aktif Değil Puanlar: 0 |
Mesaj Seçenekleri
Teşekkürler(0)
Gönderim Zamanı: 02 Haziran 2010 Saat 13:26 |
S.a Arkadaslar
Çek dökümü ile ilgili excel'e asagidaki gibi bir liste almam gerekiyor bu konuda bana yardimci olabilirmisiniz.
'With conn
' .Provider = "sqloledb" ' .CommandTimeout = 120 ' .ConnectionString = "Data Source=" & Sheet1.Cells(4, 5).Value ' & ";USER ID=" & Sheet1.Cells(8, 5).Value & ";PASSWORD=" & ' Sheet1.Cells(10, 5).Value & ";AUTO TRANSLATE=FALSE" ' .Open
' .DefaultDatabase = Sheet5.ComboBox1.Text ' End With --------------------- SC_VERENK ' Çeki verenin kodu SC_SONDUR ' Çekin sondurumu
SC_YERI ' Çekin yeri ' Islem tipi açiklamasi
|
|
unalh
Üye Kayıt Tarihi: 08 Ekim 2009 Durum: Aktif Değil Puanlar: 0 |
Mesaj Seçenekleri
Teşekkürler(0)
|
?
|
|
Conari
Kidemli Üye Kayıt Tarihi: 04 Mayıs 2007 Konum: YSTANBUL Durum: Aktif Değil Puanlar: 3513 |
Mesaj Seçenekleri
Teşekkürler(0)
|
Iyi de burada sadece baglanti var.
|
|
Netsisden vazgeçemiyorum. Beni engelliyor..
|
|
taner
Yeni Üye Kayıt Tarihi: 05 Temmuz 2007 Durum: Aktif Değil Puanlar: 4 |
Mesaj Seçenekleri
Teşekkürler(0)
|
ne yapmak istedigini tam yazarsan yardimci olalim
|
|
netsis ayna gibidir kim uyarlıyorsa o kadar cevap verir
|
|
unalh
Üye Kayıt Tarihi: 08 Ekim 2009 Durum: Aktif Değil Puanlar: 0 |
Mesaj Seçenekleri
Teşekkürler(0)
|
Yapmak istedigim excel sayfasina;
Çek raporu almak rapor basliklari asagidaki gibi olmali
Çeki verenin kodu --- Müsteri kodlari olacak -- gibi
Çekin sondurumu --- Beklemede - Ciro -Tahsil --- gibi
Çekin yeri --- Ciro - Tahsil - Teminet - Portföy - Iade -- gibi
Islem tipi açiklamasi --- Iade edildi - Portföye giris --- gibi
NeTSiSFoReVeR arkadasin yaptigi raportör programinda çek raporu var fakat benim yapmak istedigim sadece yukardaki basliklar altinda olan verilerin ekrana gelmesi bunu nasil yapabiliriz.
|
|
unalh
Üye Kayıt Tarihi: 08 Ekim 2009 Durum: Aktif Değil Puanlar: 0 |
Mesaj Seçenekleri
Teşekkürler(0)
|
|
|
taner
Yeni Üye Kayıt Tarihi: 05 Temmuz 2007 Durum: Aktif Değil Puanlar: 4 |
Mesaj Seçenekleri
Teşekkürler(0)
|
excel ile sql baglantisini yaptiktan sonra tblmcek tablosunu özet raporla excele al aradigin basliklardan olmayan olursa çekle ilgili diger tbl view ile birlestir o view 'i özet raporla alabilirsin
|
|
netsis ayna gibidir kim uyarlıyorsa o kadar cevap verir
|
|
unalh
Üye Kayıt Tarihi: 08 Ekim 2009 Durum: Aktif Değil Puanlar: 0 |
Mesaj Seçenekleri
Teşekkürler(0)
|
Çeki verenin kodu --- Müsteri kodlari olacak -- gibi
Çekin sondurumu --- Beklemede - Ciro -Tahsil --- gibi
Çekin yeri --- Ciro - Tahsil - Teminet - Portföy - Iade -- gibi
Islem tipi açiklamasi --- Iade edildi - Portföye giris --- gibi
O sekilde yapiyorum problem yok benim istedigim yukaridaki kisitlari kullanarak
asagidaki kodlarla yapmak.
Private Sub CommandButton3_Click()
Dim SqlText As String Dim conn, rs As Object Set conn = CreateObject("ADODB.Connection") Set rs = CreateObject("ADODB.Recordset") With conn .Provider = "sqloledb" .CommandTimeout = 120 .ConnectionString = "Data Source=" & Vt_Baglan.s_adi.Value & ";USER ID=" & Vt_Baglan.vt_kullanicisi.Value & ";PASSWORD=" & Vt_Baglan.vt_sifre.Value & ";AUTO TRANSLATE=FALSE" .Open .DefaultDatabase = Vt_Baglan.s_kodu.Text End With progress SqlText = "SELECT A.SC_NO,A.VADETRH,A.SC_VERENK," SqlText = SqlText + " B.CARI_ISIM,A.SC_ABORCLU," SqlText = SqlText + " A.YERI,A.CEKSERI,A.SC_VERILENK,(CASE WHEN SC_YERI='T' THEN C.ACIKLAMA ELSE (SELECT D.CARI_ISIM FROM TBLCASABIT D WHERE D.CARI_KOD=A.SC_VERILENK) END),A.RAPOR_KODU," SqlText = SqlText + " A.TUTAR,A.CEK_SUBE" SqlText = SqlText + " FROM TBLMCEK A WITH (NOLOCK) JOIN TBLCASABIT B WITH (NOLOCK) ON (A.SC_VERENK=B.CARI_KOD)" SqlText = SqlText + " LEFT OUTER JOIN TBLBNKHESSABIT C WITH (NOLOCK) ON (A.SC_VERILENK=C.NETHESKODU)" SqlText = SqlText + " WHERE A.VADETRH BETWEEN '" + Format$(Vt_Baglan.vd_baslangic, "yyyy-mm-dd") + "' AND '" + Format$(Vt_Baglan.vd_bitis, "yyyy-mm-dd") + "'" SqlText = SqlText + " AND A.SC_SONDUR='" & Vt_Baglan.Durumu_a.Value & "'" SqlText = SqlText + " AND A.SC_YERI='" & Vt_Baglan.Yeri_a.Value & "'" SqlText = SqlText + " ORDER BY A.VADETRH ASC" rs.Open SqlText, conn, adOpenStatic, adLockReadOnly Sayfa7.Range("B11:M10000").ClearContents Sayfa7.Activate i = 10 Do While Not rs.EOF Sayfa7.Cells(i, 2).Value = rs(0) Sayfa7.Cells(i, 3).Value = rs(1) Sayfa7.Cells(i, 4).Value = rs(2) Sayfa7.Cells(i, 5).Value = rs(3) Sayfa7.Cells(i, 6).Value = rs(4) Sayfa7.Cells(i, 7).Value = rs(5) Sayfa7.Cells(i, 8).Value = rs(6) Sayfa7.Cells(i, 9).Value = rs(7) Sayfa7.Cells(i, 10).Value = rs(8) Sayfa7.Cells(i, 11).Value = rs(9) Sayfa7.Cells(i, 12).Value = rs(10) Sayfa7.Cells(i, 13).Value = rs(11) rs.MoveNext i = i + 1 Loop rs.Close conn.Close Set rs = Nothing Set conn = Nothing ProgressBar1.Value = 0 'UserForm1.Show End Sub |
|
Conari
Kidemli Üye Kayıt Tarihi: 04 Mayıs 2007 Konum: YSTANBUL Durum: Aktif Değil Puanlar: 3513 |
Mesaj Seçenekleri
Teşekkürler(0)
|
excelinizi yükleyin.
|
|
Netsisden vazgeçemiyorum. Beni engelliyor..
|
|
unalh
Üye Kayıt Tarihi: 08 Ekim 2009 Durum: Aktif Değil Puanlar: 0 |
Mesaj Seçenekleri
Teşekkürler(0)
|
http://www.upload.gen.tr/d.php/s12/u9g426n0/__EK_TAK__P3.xls.html
Birde bu dosyada çikis tarihini baz aldirarak nasil veri çekebiliriz ?
Düzenleyen unalh - 07 Haziran 2010 Saat 17:52 |
|
Conari
Kidemli Üye Kayıt Tarihi: 04 Mayıs 2007 Konum: YSTANBUL Durum: Aktif Değil Puanlar: 3513 |
Mesaj Seçenekleri
Teşekkürler(0)
|
bu kadarini yaptiktan sonra geri zor olmasa gerek.
neyse yarin inceleriz.
|
|
Netsisden vazgeçemiyorum. Beni engelliyor..
|
|
unalh
Üye Kayıt Tarihi: 08 Ekim 2009 Durum: Aktif Değil Puanlar: 0 |
Mesaj Seçenekleri
Teşekkürler(0)
|
|
|
Conari
Kidemli Üye Kayıt Tarihi: 04 Mayıs 2007 Konum: YSTANBUL Durum: Aktif Değil Puanlar: 3513 |
Mesaj Seçenekleri
Teşekkürler(0)
|
http://www.upload.gen.tr/d.php/s12/cmxtrarr/__EK_TAK__P3.rar.html
maskeleri benim yaptigim gibi yap.
|
|
Netsisden vazgeçemiyorum. Beni engelliyor..
|
|
Yanıt Yaz | |
Tweet
|
Forum Atla | Forum İzinleri Kapalı Foruma Yeni Konu Gönderme Kapalı Forumdaki Konulara Cevap Yazma Kapalı Forumda Cevapları Silme Kapalı Forumdaki Cevapları Düzenleme Kapalı Forumda Anket Açma Kapalı Forumda Anketlerde Oy Kullanma |