funzione che viene confusa con una sub...

[Maxx_ale]

Ho questa funzione

Function InviaMail(IM_mittente, IM_destinatario, IM_titolo, IM_messaggio)
	Set myMail=CreateObject("CDO.Message")
	myMail.Subject= IM_titolo
	myMail.From= IM_mittente
	myMail.To= IM_destinatario
	myMail.Bcc=""
	myMail.Cc=""
	myMail.TextBody= IM_messaggio
	myMail.Send
	
	InviaMail = true
End Function

quando la richiamo con

InviaMail("ciao@ciao.it", destinatario, "titolo", testo)

e mi da questo errore

Microsoft VBScript compilation  error '800a0414'
Cannot use parentheses when calling a Sub

Ma è una funzione! che c'è che non va?
La sintassi mi pare corretta dovrebbe funzionare ed invece mi dice che non può continuare perchè non si possono usare parentesi in una Sub (e da quando poi?)