+ Rispondi al messaggio
Pagina 2 di 2 primaprima 12
Visualizzazione dei risultati da 11 a 19 su 19

Apici in textbox ricerca

  1. #11
    L'avatar di sistemista
    sistemista non  in linea Topo di biblioteca
    Quote Originariamente inviato da manu9874 Visualizza il messaggio
    mi sa che ho combinato un casino
    Mi s proprio di si...usi call e msgbox che sono deprecati e poi ti incasini la vita con tutto quel codice per cercare che basterebbe una semplice query senza il bindingsource,certo c' da capire come hai strutturato tutto il codice.
    Un esempio di semplice codice di query sarebbe questo:
    dim sql as string=string.empty
    sql="SELECT * FROM nometuatabella WHERE i campi che ti interessano ='" & parametro in ingresso "'
    questo grosso modo la query dopo il segno = si chiude con l'apice,le virgolette, la e commerciale(&)il parametro(tipo textbox.text) per finire virgolette e apice e cos chiudi la query(sql)
    Ultima modifica di sistemista; 02-04-2021 22:26 
    ℹ️ Leggi di pi su sistemista ...

  2. #12
    manu9874 non  in linea Novello
    buon pomeriggio...grazie per il vostro pazientevole aiuto ma con i vostri consigli non sono riuscito ma non per colpa vostra ma per la mia poca esperienza cmq vi ringrazio tutti...sono riuscito in questa maniera con un codice terra terra (come si suol dire) e cos mi riconosce anche gli apici...

    Private Sub RefreshData()
            Me.ProvaBindingSource.Filter = Nothing
            Me.ProvaTableAdapter.Fill(Me.TabelleProvaDataSet.Prova)
    
            With txtSearch
                .Text = ""
                .Focus()
            End With
    End Sub
    
    Private Sub btnCerca_Click(sender As Object, e As EventArgs) Handles btnCerca.Click
    
                Dim strFilter As String = txtSearch.Text.Replace("'", "''")
    
            If String.IsNullOrEmpty(txtSearch.Text) Then
                RefreshData()
            Else
                Dim queryByID As String = "(Convert(ID, 'System.String') = '" & strFilter & "') "
                Dim queryByCognome As String = "OR (Cognome LIKE '%" & strFilter & "%') "
                Dim queryByNome As String = "OR (Nome LIKE '%" & strFilter & "%') "
                Dim joinQuery As New System.Text.StringBuilder()
    
                joinQuery.Append(queryByID)
                joinQuery.Append(queryByCognome)
                joinQuery.Append(queryByNome)
                
                Me.ProvaBindingSource.Filter = joinQuery.ToString()
    
                txtSearch.Clear()
    
            End If
    End Sub
    
    eppure anche se sono inesperto in sql il salvataggio utenti, eliminazione e aggiornamento ci sono riuscito non capisco perch sto riscontrando tanta difficolt con la ricerca...cmq sono ben accetti consigli e anche critiche GRAZIE
    Ultima modifica di manu9874; 03-04-2021 15:07 

  3. #13
    L'avatar di gibra
    gibra non  in linea Very Important Person
    Quote Originariamente inviato da manu9874 Visualizza il messaggio
    eppure anche se sono inesperto in sql
    Non ha alcuna importanza, basta che tu faccia il DEBUG del codice e capisci che il tuo codice non pu funzionare.
    Devi farei il DEBUG!
    ℹ️ Leggi di pi su gibra ...

  4. #14
    manu9874 non  in linea Novello
    gibra ho provato molte volte e funziona...forse scritto in maniera poco ortodossa per sembra funzionare.

  5. #15
    Ti consiglio di studiare le seguenti pagine, che potranno aiutarti ad impostare correttamente le espressioni utilizzate per filtrare i dati del bindingsource

    BindingSource.Filter
    DataColumn.Expression
    ℹ️ Leggi di pi su Fix ...

  6. #16
    manu9874 non  in linea Novello
    Buon giorno e buona domenica a tutti...riprendo il discorso, da prove e studio consigliato gentilmente da voi "credo" di essere riuscito ed funzionante anche con gli apici...vi posto il codice...

    Private Sub searchData(sql As String, dtg As DataGridView)
            Try
                con.Open()
                cmd = New SqlCommand()
                da = New SqlDataAdapter
                dt = New DataTable
    
                With cmd
                    .Connection = con
                    .CommandText = sql
                End With
                With da
                    .SelectCommand = cmd
                    .Fill(dt)
                End With
                dtg.DataSource = dt
    
            Catch ex As Exception
                MsgBox(ex.Message)
            Finally
                con.Close()
                da.Dispose()
            End Try
        End Sub
    
    nel load del form
    
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
            sql = "SELECT * FROM Prova"
            searchData(sql, DataGridView1)
        End Sub
    
    nella textbox
    
    Dim strFilter As String = TextBox1.Text.Replace("'", "''")
    
            sql = "SELECT * FROM Prova WHERE Cognome LIKE '%" & strFilter & "%' OR Nome LIKE '%" & strFilter & "%'"
            searchData(sql, DataGridView1)
    
    a voi pi esperti...secondo voi sono riuscito ad usare correttamente i parametri??? se ancora no mi potete dire dove sbaglio??? cmq tutto funzionante...GRAZIE

  7. #17
    Dove hai usato i parametri?

    Hai letto il thread consigliato da Sgrubak?
    ℹ️ Leggi di pi su AntonioG ...

  8. #18
    manu9874 non  in linea Novello
    si...non ho usato ne anche sta volta i parametri alla fine sono caduto sempre nello stesso errore mannaggia

  9. #19
    Stai scherzando? Cos inutile continuare il thread...
    ℹ️ Leggi di pi su AntonioG ...

+ Rispondi al messaggio
Pagina 2 di 2 primaprima 12

Potrebbero interessarti anche ...

  1. Ricerca in FlexGrid con TextBox
    Da pierovb nel forum Visual Basic 6
    Risposte: 4
    Ultimo Post: 25-04-2014, 09:39
  2. Ricerca su database con textbox
    Da LeggenDario nel forum Visual Basic .Net
    Risposte: 5
    Ultimo Post: 28-08-2011, 12:06
  3. Ricerca tramite textbox VBA
    Da marcod nel forum Microsoft Word
    Risposte: 4
    Ultimo Post: 21-04-2011, 21:01
  4. ricerca con adodc in textbox
    Da anna nel forum Visual Basic 6
    Risposte: 9
    Ultimo Post: 14-09-2009, 23:32
  5. Ricerca da TextBox in DataGrid
    Da dade_n nel forum Visual Basic 6
    Risposte: 1
    Ultimo Post: 21-02-2009, 17:53