Ciao a tutti, sto cercando di fare l'importazione di numeri telefonici da una pagina excel

dunque per prima cosa faccio l'upload del file excel (e fin qui tutto ok)
poi vado a leggere i numeri di cellulare presenti e li inserisco in un db,
qui ho il problema: non vengono letti i campi numerici

il file xls è qua

il codice usato per la lettura ed il salvataggio è
codice:
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open("Provider = Microsoft.Jet.OLEDB.4.0; Data Source = " & Server.MapPath("/mdb-database/sms.mdb"))
Set objRs = Server.CreateObject("ADODB.Recordset")

'SVUOTO IL GRUPPO
set objRs = objConn.Execute("DELETE * FROM gruppo")

'LEGGO L'XLS
Dim DbConn, rs, objFile, InStream
strConn = "DRIVER={Microsoft Excel Driver (*.xls)}; DBQ=" & Server.MapPath ("/public/sms_num.xls") & ";"
set rs=server.createobject("adodb.recordset")
rs.activeconnection=strConn

sqlString="SELECT * FROM [Foglio1$]"
rs.open sqlString

while not rs.EOF
'SALVO I NUMERI NEL GRUPPO
set objRs = objConn.Execute("INSERT INTO gruppo (cell) VALUES ('"&rs(0)&"')")
rs.MoveNext
wend
rs.close

set rs=Nothing
set strConn=Nothing 

'TEST LETTURA GRUPPO
'set objRs = objConn.Execute("SELECT * FROM gruppo")
'do while not objrs.eof
' response.write objrs("cell")&"</br>"
'objrs.movenext
'loop


set objRs=Nothing
set objConn=Nothing
credo che l'errore sia nella connessione ma non riesco a risolvere