Enregistrement du contenu Excel dans une base de données via ASP

Question

J'ai utilisé le code ci-dessous pour télécharger un fichier Excel sur le serveur. maintenant je dois l'enregistrer dans une base de données. Quelqu'un peut-il me guider pour faire cela?

Dim SQLStr 
SQLStr = "INSERT ALL INTO TABLENAME " 
for each file in filCollection 
    file_name = file.name 
    path = folderObj & "\" & file_name 
    Set objExcel_chk = CreateObject("Excel.Application") 
    Set ws1 = objExcel_chk.Workbooks.Open(path).Sheets(1) 
    row_cnt = 1 


     'for row_cnt = 6 to 7 
     ' if ws1.Cells(row_cnt,col_cnt).Value <> "" then 
     ' col = col_cnt 
     ' end if 
     'next  
     While (ws1.Cells(row_cnt, 1).Value <> "") 
     for col_cnt = 1 to 10  

     SQLStr = SQLStr & "VALUES('" & ws1.Cells(row_cnt, 1).Value & "')" 
     next 
     row_cnt = row_cnt + 1 
     WEnd 


    'objExcel_chk.Quit 
    objExcel_chk.Workbooks.Close() 
    set ws1 = nothing 
    objExcel_chk.Quit 

    Response.Write(SQLStr) 

     'set filobj = FSYSObj.GetFile (sub_fol_path & "\" & file_name) 
     'filobj.Delete 

    next 
End if 
End If 

Answer 1

Read From Excel

Le lien dit ci-dessus, vous devez avoir Excel installé sur le serveur et vous devez disposer des autorisations appropriées définies dans le fichier Excel pour lire. En dehors de ce processus, je ne sais pas comment vous le feriez.