Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Errore: tipo non corrispondente

63 views
Skip to first unread message

Alberto Luzi

unread,
Jun 18, 2021, 12:23:20 PM6/18/21
to
Salve!
non mi spiego perchè ogni tanto ho l'errore tipo non corrispondente.

su click di un pulsante ho:
Dim Arg As Variant

'strFrm = Screen.ActiveForm.Name
Arg = Me.Name & "|" & Nz(Me!txtLink_IdCliente, -1) & "|" & Nz(Me!txtLink_IdFornitore, -1)
DoCmd.OpenForm "M_aggiungi", , , , , , Arg

**************************
su apertura di M_Aggiungi ho:
Dim IdC As Long, IdF As Long

If Me.OpenArgs > "" Then
IdC = Split(Me.OpenArgs, "|")(1)
IdF = Split(Me.OpenArgs, "|")(2)
End If

If IdC > -1 And IdF > -1 Then
Me!CboCliente = IdC
CboCli
Me!CboFornitore = IdF
CboFo
Else
Exit Sub
End If

La maschera mi si apre ugualmente, ma senza dati.
grazie

@Alex

unread,
Jun 18, 2021, 2:34:52 PM6/18/21
to
Devi imparare a fare DEBUG... altrimenti è complicato.
Metti jn debug.print e stampa in Finestra immediata i valori utili a capire, così quando i pianta ci guardi e capisci.

@Alex

Alberto Luzi

unread,
Jun 19, 2021, 3:45:01 AM6/19/21
to
ok
grazie

Alberto Luzi

unread,
Jun 19, 2021, 2:41:13 PM6/19/21
to
ciao Alex
se qui ho la possibilità di anche ="" : "|" & Nz(Me!txtLink_IdFornitore, -1) oltre a null,
consigli di fare cosi'?
IIf(IsNull( Me!txtLink_IdFornitore) Or Me!txtLink_IdFornitore="", -1, Me!txtLink_IdFornitore)
oppure ????

@Alex

unread,
Jun 20, 2021, 9:52:54 AM6/20/21
to

> ciao Alex
> se qui ho la possibilità di anche ="" : "|" & Nz(Me!txtLink_IdFornitore, -1) oltre a null,
> consigli di fare cosi'?
> IIf(IsNull( Me!txtLink_IdFornitore) Or Me!txtLink_IdFornitore="", -1, Me!txtLink_IdFornitore)
> oppure ????

Puoi tradurre in italiano....?
Non si capisce nulla.

@Alwx

Alberto Luzi

unread,
Jun 20, 2021, 12:57:18 PM6/20/21
to
ho notato che se il valore di Me!txtLink_IdFornitore è uguale a ""
Nz non mi restituisce -1

@Alex

unread,
Jun 20, 2021, 3:01:57 PM6/20/21
to
> ho notato che se il valore di Me!txtLink_IdFornitore è uguale a ""
> Nz non mi restituisce -1

Ovvio nz discrimina NULL non NULLSTRING
Quindi devi scrivere una cosa che restituisca -1sia con Null che NullString.
Iif(Len(tuocontenuto + '')=0;-1;tuocontenuto)

Saluti
@Alex

Alberto Luzi

unread,
Jun 21, 2021, 1:11:51 AM6/21/21
to
grazie
0 new messages