Visual Basic 6 - come usare una variabile in una query

come faccio ad usare una variabile in una query?

esempio :

sql = "Select * from tabella where campo = " & campo1

in pratica dentro variabile sql hai la tua query...non ti resta che farla eseguire

se stringa ricordati gli apici

se non è chiaro spiega il tuo caso

la mia e una query di accodamento(insert into) e ho velle variabili con dei risultati tirati fiori da un file di lettura.sto usando un tipo di dato aggregato di tipo

Private Type employeeUTD
file As String
SCHEMA As String
DDNAME As String
DSNAME As String
FIELDS() As String
End Type

voglio inserire quei dati nella tabella
If Mid(inputstr, 1, 6) = "DDNAME" Then
inputstr = Mid(inputstr, 7)
inputstr = LTrim(inputstr)
If Mid(inputstr, 1, 1) = "=" Then
inputstr = Mid(inputstr, 2)
inputstr = LTrim(inputstr)
If InStr(inputstr, " " Then
lun = InStr(inputstr, " "
inputstr11 = Left(inputstr, lun - 1)
inputstr22 = Mid(inputstr, lun)
inputstr11 = Trim(inputstr11)
DDNAME1 = inputstr11
inputstr22 = LTrim(inputstr22)
If InStr(inputstr22, "DSNAME" Then
inputstr22 = Mid(inputstr22, 7)
inputstr22 = LTrim(inputstr22)
If Mid(inputstr22, 1, 1) = "=" Then
inputstr22 = Mid(inputstr22, 2)
DSNAME1 = inputstr22

emp.DSNAME = DSNAME1
emp.DDNAME = DDNAME1
claudio(w) = emp

For i = 1 To (w) - 1
m_fun.FnConnection.Execute "Insert into DMSUPRA_TABELLE (DDName) VALUES( claudio(i).DDName )"
Next i qui mi da errore

GRADIRE UN AIUTO???????

1) Non scrivere in maiuscolo perchè equivale ad urlare (leggi il regolamento)

2) Ti ha già risposto poeo85

Poi tu hai postato il tuo codice senza dire niente, ne se non avevi capito qualcosa, ne dove hai problemi, ecc... A me la risposta di poeo85 sembra esauriente, non dovrebbe essere difficile da capire.

come ti ho spiegato nel mio esempio

sql = "Select * from tabella where campo = " & campo1

non puoi fare

m_fun.FnConnection.Execute "Insert into DMSUPRA_TABELLE (DDName) VALUES( claudio(i).DDName )"


visto che claudio è una "variabile"
non mi sembra di aver scritto cose errate e difficili

se vuoi la soluzione

m_fun.FnConnection.Execute "Insert into DMSUPRA_TABELLE (DDName) VALUES( '" & claudio(i).DDName & "' )"

per le stringhe ricordati l'apice => '


non so essere più chiaro di così