HTMLEncode fungerer ikke

Jeg har et problem med specialtegn, som jeg har læst kan løses med HTMLEncode, men den virker ikke i følgende kode, som ellers fungerer fint?

Dim varFornavn, varEfternavn, varTelefon, varFoedselsdato

varFornavn =        Request.Form    ("fornavn"    )
varEfternavn =        Request.Form    ("efternavn"    )
varTelefon =        Request.Form    ("telefon"    )
varFoedselsdato =    Request.Form    ("foedselsdato"    )

varFornavn = Server.HTMLEncode("varFornavn");

SQL = "Insert into personer ("

SQL = SQL & "Fornavn,"
SQL = SQL & "Efternavn,"
SQL = SQL & "Telefon,"
SQL = SQL & "Foedselsdato)"

SQL = SQL & "values("

SQL = SQL & "'" & varFornavn & "',"
SQL = SQL & "'" & varEfternavn & "',"
SQL = SQL & "'" & varTelefon & "',"
SQL = SQL & "'" & varFoedselsdato & "')"

CONN.Execute(SQL)