Titolo: Cercafield : Query veloce lookup
Categoria: Codice |
|
Ultimo Aggiornamento: 09/12/18 |
// ritorna i dati da una tabella non correlata
// $1 campo, $2 chiave, $3 tabella, $4 $filtro
C_TEXT($campo) // è il campo che utilizzo per la ricerca
C_TEXT($chiave) // è la chiave cioè il campo che voglio sia ritornato
C_TEXT($tabella) // è il nome della tabella per la quale voglio effettuare la ricerca
C_TEXT($filtro) // eventuale filtro WHERE
C_TEXT($risultato)
$campo:=$1
$chiave:=$2
$tabella:=$3
$filtro:=$4
SQL LOGIN(SQL_INTERNAL;"";"")
C_LONGINT($ffiltro)
$ffiltro:=Position($filtro;"%")
If ($ffiltro>0)
$filtro:=Char(Quote)+$filtro+Char(Quote)
SQL EXECUTE("SELECT DISTINCT "+$chiave+" FROM "+$tabella+" WHERE "+$campo+" LIKE "+$filtro;$risultato)
Else $filtro:=Char(Quote)+$filtro+Char(Quote)
SQL EXECUTE("SELECT DISTINCT "+$chiave+" FROM "+$tabella+" WHERE "+$campo+" = "+$filtro;$risultato)
End if SQL LOAD RECORD(
SQL all records)
SQL LOGOUT
$0:=$risultato{0}
Inviato da: Massimiliano Chiodi |
|
Visite: 6080 |
Se accedi con utente e password, puoi aggiungere dei commenti.