ASP에서 엑셀파일 업로드후 데이터베이스에 입력을 할려고 하는데!

그런데 그만!

특정 행만 입력이 안되는 겁니다. 엉엉...

그래서 자주찾는 태오사이트에 질문을 하려고 하는데 파일첨부가 안되네요.

그래서 여기 파일 첨부를 하고 태오에 등록을 할려고 이러고 있네요.

 

day_auction_pig.xls

test2.xls

day_auction.pig_xls는 어떤 사이트에서 다운받은 파일 그대로이고, test2.xls는 원본 파일을 공백을 다 제거해주고 서식을 일반으로 바꿔준 파일이다.

임시로 결과를 출력하는 코드를 작성했는데.

excelConn="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & excelFile & "; Mode=ReadWrite|Share Deny None; Extended Properties='Excel 8.0;HDR=YES;';Persist Security Info=False"

Set excelDB = Server.CreateObject("ADODB.Connection")
excelDB.Open excelConn

sql = "SELECT * FROM [Sheet1$]"
Set excelRS = excelDB.Execute(sql)

response.write "<table border=""1""><tr><td>작업장명</td><td>돈피(성별)</td><td>등급</td><td>경락두수</td><td>비율(%)</td><td>지율증량</td><td>최고가(원)</td><td>최저가(원)</td><td>평균(원)</td></tr>"
DO UNTIL excelRS.EOF
    title = Trim(excelRs(0))
    Select Case title
        Case "농협서울"
            For i = 0 To 8
                If i = 0 Then response.write "<tr>"
                If excelRs(i) = "" Then
                    response.write "<td>빈칸</td>"
                else
                    response.write "<td>"& excelRs(i) & "</td>"
                End if
                If i = 8 Then response.write "</tr>"
            Next
        End Select
    excelRs.movenext
Loop

Set excelRs = Nothing
response.write "</table>"

이렇게 하고 출력을 하면...

이렇게 나온다.

비율과 평균의 값이 안 나오는 것이다.

 

이 문제를 좀 해결해주실분 ㅜㅜ...(반말,높임말 맘대로군요;)