locked
[Office 2003, Access] dış bağlantılı sorguda sorun RRS feed

  • Soru

  • selam

    access 2003 kullanmaktayım formda 1 liste kutum var ve seçenekli arama yapmaktayım

    fakat başka bir uygulamamda kullandığım kodlar yeni yapmaya çalıştığım uygulamamda çalışmamakta

    alttaki kodlarla bağlantı kuruyordum fakat başka bir uygulamada çalışmadı
    ne yaptıysam bulamadım
    aralarda boşluk bırakmak _ alt tire leri sorun yaptı değiştirdim bu defada
    kırmızı ve mavi alanda sorun çıktı arasında boşluk olması gerekli fakat listeye yüklendiğinde tekrar kapalı geldi
    bu sorgulamayı bütün genel uygulamalarımda kullanmaktayım
    sorun ne olmalı
    saygılarımla

    SELECT Adres_ID,Kodu,KYT_Tarih,Unvanı,TC_No,İL,Adres_1 FROM 1_Tablo_Adres WHEREUnvanı Like '**' ORDER BY 1_Tablo_Adres.Adres_ID,1_Tablo_Adres.Unvanı

    Public Sub SECENEKLİ_ARA_1()
    Dim sql As String
    Dim str As String
    Select Case Çerçeve1
    Case 1
    str = "Kodu Like '" & "*" & [Forms]![5_Form_Adres_Arama]![ARA] & "*" & "' ORDER BY 1_Tablo_Adres.Adres_ID,1_Tablo_Adres.Unvanı"
    Case 2
    str = "KYT_Tarih Like '" & "*" & [Forms]![5_Form_Adres_Arama]![ARA] & "*" & "' ORDER BY 1_Tablo_Adres.Adres_ID, 1_Tablo_Adres.Unvanı"
    Case 3
    str = "Unvanı Like '" & "*" & [Forms]![5_Form_Adres_Arama]![ARA] & "*" & "' ORDER BY 1_Tablo_Adres.Adres_ID,1_Tablo_Adres.Unvanı"
    Case 4
    str = "TC_No Like '" & "*" & [Forms]![5_Form_Adres_Arama]![ARA] & "*" & "' ORDER BY 1_Tablo_Adres.Adres_ID,1_Tablo_Adres.Unvanı"
    Case 5
    str = "İL Like '" & "*" & [Forms]![5_Form_Adres_Arama]![ARA] & "*" & "' ORDER BY 1_Tablo_Adres.Adres_ID,1_Tablo_Adres.Unvanı"
    Case 6
    str = "Adres_1 Like '" & "*" & [Forms]![5_Form_Adres_Arama]![ARA] & "*" & "' ORDER BY 1_Tablo_Adres.Adres_ID,1_Tablo_Adres.Unvanı"
    End Select
    sql = "SELECT Adres_ID,Kodu,KYT_Tarih,Unvanı,TC_No,İL,Adres_1 FROM 1_Tablo_Adres WHERE" & str
    Liste1.RowSourceType = "table/query"
    Liste1.RowSource = sql
    End Sub

    2 Aralık 2010 Perşembe 11:11

Yanıtlar

  • Merhabalar,

    Anladığım kadarıyla bir web sayfası üzerinden veritabanınızdaki verilerde sorgular hazırlayıp bunları çekmek istiyorsunuz.

    Konu ile ilgili Office sitemizde Access ve Web başlıklı anlatımları incelemenizi öneririm.


    Mehmet Hakan TATLICI
    Microsoft Destek Mühendisi - Moderator
    3 Aralık 2010 Cuma 07:20