Ciao a tutti,
premesso che sono nuovo sia su Access che su VB, mi trovo in difficoltà nel richiamare una funzione da una query.
questa è la mia query:
SELECT
"???" AS nome,
"???" AS ente_componente,
"???" AS stato_classificazione,
EXP_APPROACH AS calcolo_rischio,
calcola_tipo_strumento([forma_tecnica_proven];[prestiti_rotativi]) AS tipo_strumento,
"???" AS data_xxx,
"???" AS trib
INTO Output_Tabella1
FROM campi_per_tabella1;
Il problema che incontro si trova nella chiamata alla funzione calcola_tipo_strumento per "errore di sintassi".
La funzione che ho creato è:
Option Compare Database
Option Explicit
Public Function calcola_tipo_strumento(r111 As String, r222 As String) As String
If r111 = "11" Or "53" Then
calcola_tipo_strumento = "conto"
ElseIf r111 = "58" Or "59" Or "60" Then
calcola_tipo_strumento = "carta"
ElseIf r111 = "99" Then
If r222 = "1" Then
calcola_tipo_strumento = "aaa"
ElseIf r222 = "0" Then
calcola_tipo_strumento = "bbb"
End If
End If
End Function
Qualcuno saprebbe dirmi da che cosa può dipendere e cosa possa andare a guardare?
Grazie mille