보안접속
회원등록 비번분실
컴퓨팅
Support Wikipedia

 Windows Tip
윈도우팁
 
작성자 서비
작성일 2013-12-08 16:04
ㆍ추천: 0  ㆍ조회: 1176      
asp 업로드 엑셀 파일 시트명 가져오기
  filesize = theForm("upfile").FileLen '파일사이즈
  filename = theForm("upfile").FileNameWithoutExt '파일명
  extension = theForm("upfile").FileExtension '파일확장자



   excel_filename = filename&"_"&Formatdate(Now(),"YYYYMMDDhhmmss")&"."&extension
   theForm("upfile").SaveAs UploadPath & excel_filename, False



   XlsFile = Server.MapPath(".")&"\excel\"&excel_filename
     Set XlsConn = Server.CreateObject("ADODB.Connection")
   connectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&XlsFile&"; Extended Properties=""Excel 8.0;HDR=YES;IMEX=1;"""
   XlsConn.Open connectString
   
   Set oADOX = CreateObject("ADOX.Catalog") '시트명을 얻기위한 object

   oADOX.ActiveConnection = connectString

   For Each oTable in oADOX.Tables
    SheetName  = oTable.Name
   Next



 
번호     글 제 목  작성자 조회 작성일
8 windows8 administrator 계정 활성화 서비 420 윈도우 2014-04-04
7 virtualbox 해상도 추가 서비 708 윈도우 2013-12-24
6 asp 업로드 엑셀 파일 시트명 가져오기 서비 1176 2013-12-08
5 ask 툴바 삭제후 주소창이 이상 동작 할 경우 관리자 1880 윈도우 2009-08-10
4 msn 이멜주소 지우기 관리자 2153 윈도우 2005-09-25
3 구버전 msn 지우기 관리자 2243 윈도우 2004-11-03
2 한글이 깨질경우 대처법 관리자 2033 윈도우 2004-09-01
1 부팅시 같이 실행되는 정체불명의 실행 프로그램 관리하기 관리자 2701 윈도우 2004-04-12
1

서울시 강동구 - www.subi.biz