[문제발생]
.xls 를 .xlsx 로 서식 변경해서 엑셀 서식을 서버에 올린다.
서식을 버전 변경하고, 다시 다운 받도록 한다.
삭제하고, 다시 다운을 받았지만.
계속해서 HRESULT: 0x800A03EC 오류가 발생한다.
[프로그램소스]
vb.net
If InStr(UCase(FileName), "XLSX") > 0 Then
If File.Exists(strXlsFilePath & FileName) Then '// 다운 받기 전에 파일을 먼저 지운다..
File.Delete(strXlsFilePath & FileName)
End If
Else
If File.Exists(strDllFilePath & FileName) Then '// 다운 받기 전에 파일을 먼저 지운다..
File.Delete(strDllFilePath & FileName)
End If
End If
Try
Dim fs As FileStream
If InStr(UCase(FileName), "XLSX") > 0 Then
fs = New FileStream(strXlsFilePath & FileName, FileMode.Create, FileAccess.Write)
Else
fs = New FileStream(strDllFilePath & FileName, FileMode.Create, FileAccess.Write)
End If
strResult = wWEBSERVICE.DOWNLOADFILE(FileName)
Try
Dim byteFile() As Byte = DeSerializer(strResult, True)
Dim ms As System.IO.MemoryStream = New IO.MemoryStream(byteFile)
fs.Write(byteFile, 0, Convert.ToInt32(byteFile.Length))
fs.Close()
Return "COMPLETE"
Catch ex As Exception
LAB_INFORMATION.Text = FileName.ToString & " DOWNLOAD FALSE"
LAB_INFORMATION.Refresh()
Return "ERROR"
End Try
Catch ex As Exception
Return ex.ToString
End Try
[엑셀]
엑셀 아래쪽에 sheet 명이 있는 곳에 보면 접근성: 조사필요 를 클릭해보면..
이미지에 대체 텍스트 편집을 하지 않았거나, 장식으로 처리하지 않은 경우는
서버에서 내려받고 프로그램으로 파일을 오픈하려면 오픈되지 않고, 오류메세지가 발생하고,
로컬경로에서 파일미리보기를 하면 이 파일은 미리 볼 수 없습니다. 라고 뜬다.
그럼, 엑셀 서식 내 그림을 장식으로 처리하고, 파일을 선택해 보면.
'VB.NET&MSSQL' 카테고리의 다른 글
라즈베리 파이 원격 접속 (0) | 2023.03.21 |
---|---|
vb.net .net core 웹서비스참조추가 (0) | 2023.03.18 |
MSSQL DATAFILE 위치변경 (0) | 2021.12.29 |
[MSSQL] 숫자인지 문자인지 확인 (0) | 2021.10.16 |
IIS LOG FILE 삭제 방법 (0) | 2021.08.14 |
댓글