Buongiorno ragazzi, ho il seguente problema:
ho due tabelle:
in una sono contenuti codici numerici lunghi 2/3/4/5 caratteri
nell'altra ci cono dei numeri il cui inizio è uguale al codice della prima tabella
esempio:
la prima tabella contiene:
125
2467
12
89674
la seconda contiene:
896744578
24672478
12457
vorrei far selezionare alla mia sql dalla tabella numeri, solamente quelli che contengono il codice questo è quello che faccio:
strSQL = "select * from Tabella_codici"
set rsCatalog = Conn.Execute (strSQL)
rsCatalog.MoveFirst
while not rsCatalog.EOF
Codice = rsCatalog("Codice")
lunghezza_codice = len(Codice)
strSQL2 = "select * from Tabella_numeri where (left(Destinatrio,lunghezza_codice)) = '"&Codice&"' "
******* Questa SQL non funziona , se sostituisco la parola "lunghezza_codice" con un numero invece funziona, ma io ho necessità che vari in base alla lunghezza del codice letto nella prima tabella
set rsCatalog2 = Conn.Execute (strSQL2)
rsCatalog2.MoveFirst
while not rsCatalog2.EOF
numero = rsCatalog2("numero")
rsCatalog2.MoveNext
wend
rsCatalog.MoveNext
wend
Grazie a tutti
ho due tabelle:
in una sono contenuti codici numerici lunghi 2/3/4/5 caratteri
nell'altra ci cono dei numeri il cui inizio è uguale al codice della prima tabella
esempio:
la prima tabella contiene:
125
2467
12
89674
la seconda contiene:
896744578
24672478
12457
vorrei far selezionare alla mia sql dalla tabella numeri, solamente quelli che contengono il codice questo è quello che faccio:
strSQL = "select * from Tabella_codici"
set rsCatalog = Conn.Execute (strSQL)
rsCatalog.MoveFirst
while not rsCatalog.EOF
Codice = rsCatalog("Codice")
lunghezza_codice = len(Codice)
strSQL2 = "select * from Tabella_numeri where (left(Destinatrio,lunghezza_codice)) = '"&Codice&"' "
******* Questa SQL non funziona , se sostituisco la parola "lunghezza_codice" con un numero invece funziona, ma io ho necessità che vari in base alla lunghezza del codice letto nella prima tabella
set rsCatalog2 = Conn.Execute (strSQL2)
rsCatalog2.MoveFirst
while not rsCatalog2.EOF
numero = rsCatalog2("numero")
rsCatalog2.MoveNext
wend
rsCatalog.MoveNext
wend
Grazie a tutti