Visualizzazione dei risultati da 1 a 8 su 8
  1. #1
    Utente bannato
    Registrato dal
    Jan 2004
    Messaggi
    22

    usare sql

    salve a tutti
    il mio probelma vi risulterà piuttosto stupido..
    bhe... sono le kose stupide ke rendono la vita complikata hehehe

    dunque...

    ho associato all'evento click di un pulsante il seguente codice


    Dim conn, rs
    Set conn = CreateObject("ADODB.Connection")
    Set rs = CreateObject("ADODB.RecordSet")
    Dim SQL, ConnStr As String
    ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = data.mdb"
    conn.Open ConnStr
    SQL = "SELECT clienti.cap FROM clienti WHERE clienti.cap='122'"
    rs.Open SQL, conn, adOpenDynamic, adLockOptimistic


    come output secondo il mio db, dovrei ottenere una stringa contenente 122 che è il cap che desidero.. infatti se lo faccio in access tutto funziona
    solo che in vb, non so come ricavare l'output.. cioè.. il risultato di tale interrogazione, sekondo la teoria che sto studiando a skuola, diverrebbe una nuova tabella ..ma come faccio a risalire ad essa? vorrei associare il sultato ad un campo testo...
    come faccio?

    vi ringrazio

  2. #2
    attenzione ai titoli vedi regolamento
    Vascello fantasma dei mentecatti nonchè baronetto della scara corona alcolica, piccolo spuccello di pezza dislessico e ubriaco- Colui che ha modificato l'orribile scritta - Gran Evacuatore Mentecatto - Tristo Mietitore Mentecatto chi usa uTonter danneggia anche te

  3. #3
    Utente di HTML.it L'avatar di allejo
    Registrato dal
    Jul 2001
    Messaggi
    747
    che errore ti dà?
    Allejo

  4. #4
    Utente bannato
    Registrato dal
    Jan 2004
    Messaggi
    22

    re:

    non mi da nessu errore... cioè.. non so dove recuperare il mio risultato

  5. #5
    Utente di HTML.it L'avatar di MMarzia
    Registrato dal
    Mar 2001
    Messaggi
    1,781

    Re: re:

    Originariamente inviato da dangerdvd
    non mi da nessu errore... cioè.. non so dove recuperare il mio risultato
    dopo gli opportuni controlli sul recordset:
    codice:
    risultato = rs("NomeCampo")
    io sono festosamente cicciottello :: e. cartman

    t'amo senza sapere come, nè quando nè da dove,
    t'amo direttamente senza problemi nè orgoglio:
    così ti amo perchè non so amare altrimenti

  6. #6
    Utente bannato
    Registrato dal
    Jan 2004
    Messaggi
    22
    grazie mille ;-)

  7. #7
    Utente bannato
    Registrato dal
    Jan 2004
    Messaggi
    22

    ANKORA PROBLEMI :-(

    Private Sub cmd_Click()



    Dim conn, rs
    Set conn = CreateObject("ADODB.Connection")
    Set rs = CreateObject("ADODB.RecordSet")
    Dim SQL, ConnStr As String
    ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = data.mdb"
    conn.Open ConnStr
    SQL = "SELECT privato.cap FROM privato WHERE clienti.cap='122'"
    rs.Open SQL, conn, adOpenDynamic, adLockOptimistic

    Text1.Text = rs.Fields("cap")




    End Sub


    ho associato a un pulsantq questo codice, ma mi viene un errore del tipo:
    NESSUN VALORE SPECIFICATO PER LCUNI PARAMETRI NECESSARI E IL DEBUG MI SEGNALA ERRORE ALLA RIGA

    rs.Open SQL, conn, adOpenDynamic, adLockOptimistic




    KE FACCIO???

  8. #8
    Utente di HTML.it L'avatar di Mychy
    Registrato dal
    Oct 2000
    Messaggi
    794
    L'errore è sulla SQL
    SQL = "SELECT privato.cap FROM privato WHERE clienti.cap='122'"

    come fa a trovare il valore di un campo (clienti.cap) contenuto in una tabella che non interroga (clienti)?

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.