로컬 텍스트 엑셀 파일 읽기/쓰기
익스플로우의 보안에 허용만 가능하면 자바스크립트 상에서도 읽기/쓰기가 가능하다.
우선 text파일 읽고 쓰는 예제이다.(C:\\book1.txt를 읽고 씀)
=====================================================================================================================
<html>
<head>
<title>file save/load</title>
<script type="text/javascript">
var fso=new ActiveXObject("Scripting.FileSystemObject");
var filename="C:\\book1.txt";
function savefile() {
if (!fso.FileExists(filename)) {
fso.CreateTextFile(filename,true);
}
var f=fso.OpenTextFile(filename,2,true);
f.Write(myarea.innerHTML);
f.Close();
}
function loadfile() {
if (!fso.FileExists(filename)) {
fso.CreateTextFile(filename,true);
}
var f=fso.OpenTextFile(filename,1);
r=f.ReadAll();
f.Close();
myarea.innerHTML=r;
}
//function window.onload() {
// loadfile(filename);
//}
</script>
</head>
<body>
<table>
<tr>
<td>
<div id=myarea contenteditable=true style="width:320;height:240;border:solid 2 inset;overflow:scroll;background-color:silver;"></div>
<br><input type=button value=load onclick=loadfile()><input type=button value=save onclick=savefile()>
</td>
</tr>
</table>
</form>
</body>
</html>
======================================Excel 파일 열고 쓰기 =================================================
- 쓰기 -
<script type="text/javascript">
// Declare the variables
var Excel, Book;
// Create the Excel application object.
Excel = new ActiveXObject("Excel.Application");
// Make Excel visible.
Excel.Visible = true;
// Create a new work book.
Book = Excel.Workbooks.Add()
// Place some text in the first cell of the sheet.
Book.ActiveSheet.Cells(1,1).Value = "This is column A, row 1";
// Save the sheet.
Book.SaveAs("C:\\book1.xls");
// Close Excel with the Quit method on the Application object.
Excel.Application.Quit();
</script>
- 열기 -
function StartExcel() {
var oExcel;
var oWBook;
oExcel = new ActiveXObject("Excel.Application");
oExcel.Visible = true;
oExcel.workbooks.open("C:/test.xls");
oExcel.Quit();
oExcel = null;
}
간단한 파일 읽기의 경우 상당히 유용할 수 있겠다..