Sorgu için arama sonuçları: Catalog

  1. C

    [ÇÖZÜLDÜ] Ado ile Kapalı Dosyadan Sayfa Kopyalama

    ...Sub verilerial() dosyaadi = Array("dat1", "dat2", "dat3") Set baglanti = CreateObject("ADODB.Connection") Set sayfalar = CreateObject("ADOX.Catalog") For a = 0 To UBound(dosyaadi) baglanti.Open "Driver={Microsoft Excel Driver (*.xls)};Dbq=E:\sample\" & dosyaadi(a) sayfalar.ActiveConnection =...
  2. S

    User Form İçinde CMD Uygulaması

    ...güzel olur. butona basıldığında çalışan kodlar aşağıdadır. catalog = ctl If code = 0 Then komut = "vindex -rebuild -a -3 " & catalog & Mid(SDT, 1, 3) & Mid(yıl, 3, 2) & frm & ".dst" End If If code = 1 Then komut = "vindex...
  3. I

    SQL Veritabanından alınan verilerde oluşan sorun?

    Sevgili arkadaşlar; Bağlantı: Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=True;Initial Catalog=LKSDB;Data Source=DENEME;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=DENEME;Use Encryption for Data=False;Tag with column collation when...
  4. Z

    Sql views'e koşul ekleme

    ...ADODB.Connection Set rst = New ADODB.Recordset strConn = "PROVIDER=SQLOLEDB;" strConn = strConn & "DATA SOURCE=" & server_ismi & ";INITIAL CATALOG=" & veritabanı_ismi & ";" strConn = strConn & "UID=" & user & ";PWD=" & password cnt.ConnectionString = strConn cnt.Open tablo_ismi = "aaa"...
  5. A

    Makro ile Sql den bilgi almak

    ...gibi bilgilerimi alabiliyorum. BAĞLANTI: Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=True;Initial Catalog=DATA06;Data Source=192.168.0.7;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=OZCANBLG;Use Encryption for Data=False;Tag with...
  6. H

    exceldeki 1 satırı access e sürekli alt alta eklemek

    ...var mesajı veriyor. bunu silmek istemiyorum. içine surekli eklenmesi gerek cunku. tesekkurler Dim Baglan As Object Dim Katalog As ADOX.Catalog Dim Komut As String Dim Kaynak_Dosya As String Dim Hedef_Dosya As String Set Baglan = CreateObject("ADODB.connection")...
  7. I

    visual basic dilinde işlem hatası

    ...Set TBaglanti = New ADODB.Connection TBaglanti.Open "Provider=SQLOLEDB.1;Password=baris;Persist Security Info=True;User ID=baris;Initial Catalog=nebim2004;Data Source=DATABASE" With Deneme1 .ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and...
  8. dEdE

    Dosya Uzantıları

    ...ID file .BS1 Apogee Blake Stone data file .BSC Boyan Script .BSV BASIC Bsave data C .C C source code .CAL Calendar schedule data .CAT Catalog file .CB Mcft clean boot file .CBK Wave Blaster sound bank file (alternate sets of sounds and instruments) .CBL Cobol source code .CC C/C++ source...
  9. O

    access veritabanına tablo yaratırken otomatik sayı verme!

    ...otomatik sayı olarak atanmasını istiyorum.hangi kodları eklemem lazım? yardımlarınız için teşekkürler. saygılar:yardim: Dim cat As New ADOX.Catalog Dim tbl As New ADOX.Table Dim conn As New ADODB.Connection Dim rst As New ADODB.Recordset Dim Şifre As String Dim...
  10. O

    .mdb ile veritabanına kayıt

    ...nasıl aktarabiliriz. yardımlarınız için şimdiden teşekkürler saygılar:yardim: kod: Option Explicit Sub Düğme1_Tıklat() Dim cat As New ADOX.Catalog Dim Şifre As String Dim DatabasePath As String Şifre = "iso" DatabasePath = ThisWorkbook.Path & "\iso.mdb" cat.Create...
  11. H

    Veritabanı içinden başka bir yerde yeni bir veritabanı dosyası oluşturmak

    ...Bu kodu sözkonusu şekilde ayarlayacak arkadaşlara şimdiden teşekkürler. Kod şöyle: Private Sub vtyap_Click() Dim Yol As String Dim Cat As Object Yol = "C:\vt1.mdb" Set Cat = CreateObject("ADOX.Catalog") Cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Yol End Sub
  12. T

    (VB6)Kodla Klasör-Data oluşturmada hata?

    ...& "\" & Text2.Text & ".mdb" 'Oluşturlan klasör içine veritabanını atar ve Text2de yazanı isim olarak verir Set Cat = CreateObject("ADOX.Catalog") sCnn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DatabasePath & ";User ID=admin;Jet OLEDB:Database Password=" & Şifre 'Şifreli...
  13. T

    Klasör oluşturup içine dosya oluşturma

    ...& Text1.Text & ".mdb" 'Oluşturlan klasör içine veritabanını atar ve Text1de yazanı isim olarak verir Set Cat = CreateObject("ADOX.Catalog") Cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DatabasePath & ";User ID=admin;Jet OLEDB:Database Password=" & Şifre 'Şifreli...
  14. T

    Yeni veri tabanı oluşturma hakkında

    ...Dim Cat As Object Dim NewTable As Object DatabasePath = App.Path + "\Tools\Data.mdb " Set Cat = CreateObject("ADOX.Catalog") Cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DatabasePath Set NewTable = CreateObject("ADOX.Table") With NewTable...
  15. Orion1

    Alan'ları Biçimlendirmek

    ...Dim Yol As String Dim Cat As Object Dim NewTable As Object Yol = "C:\Evren\MDB\db2.mdb" Set Cat = CreateObject("ADOX.Catalog") Cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Yol Set NewTable = CreateObject("ADOX.Table") With NewTable...
  16. B

    SqlServer Query ile SQL

    ...Sub .cnn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User Id=ssret;Password=432;Data Source=192.168.0.1; Initial Catalog=MUH_2006" .cnn.CursorLocation = adUseClient .cnn.Open End With fakat aşağıdaki kodlarda yanlışlık yaptığımdan verileri sayfaya...
  17. K

    sql de database sorgusu

    ...Private Sub Workbook_Open() Set cnt = New ADODB.Connection strConn = "PROVIDER=SQLOLEDB;" strConn = strConn & "DATA SOURCE=127.0.0.1;INITIAL CATALOG=dbnakliye;" strConn = strConn & " INTEGRATED SECURITY=sspi;" cnt.Open strConn Set rst = New ADODB.Recordset With rst .ActiveConnection = cnt...
Üst