iron3d
Excelでリスト管理、html書出し †
- FileSystemObject?
// File Object取得まで…
var fso = new ActiveXObject("Scripting.FileSystemObject");
var current=".";
var crntFolder = fso.GetFolder(current);
var fileName = "temp.xls";
var filePath = crntFolder + "\\" + fileName;
if(fso.FileExists(filePath)){
var fileObj = fso.GetFile(filePath);
}
- Excel file操作
// 上から続いて…
// Worksheetを探す
var typ = fileObj.type;
if( typ.match("Office") || typ.match("Excel") ){
var xls = new ActiveXObject( "Excel.Application");
var WB = xls.WorkBooks.Open( xlsfilepath, 0 );
var ALLWS = WB.WorkSheets;
var WSName = "Sheet1";
var WSObj = false;
for(i=1;i<ALLWS.count+1;i++){
if(ALLWS(i).name==WSName){
WSObj = ALLWS(i);
break;
}
}
// CELL行列を検索 (ROW, COL)
if (WSObj){
cntx = "";
R_ST = 1; // 行(ROW)開始番号
R_ED = 256; // 行(ROW)終了番号
C_ST = 1; // 列(COL)開始番号
C=ED = 16; // 列(COL)終了番号
for(i=R_ST; i<R_ED+1; i++){
for(j=C_ST; j<C_ED+1; j++) cntx += WSOBJ.cells(i,j).Value + ",";
}
var num = cntx.length;
if(num){
cntx = cntx.substr(1,num-2); //最後の","を削除
}
}
- ここでHTML TAG化作業を入れる…
//例えば、string.splitで要素分解して、Tableに埋め込む…など
var spl = cntx.split(",");
var numspl = spl.length;
var tabletag = "";
for(i=0;i<numspl;i++){
tabletag += "<TR><TD><FONT SIZE=2>" + spl[i] + "</FONT></TD></TR>";
}
var htmltag = "<HTML><BODY><TABLE BORDER=1>" +tabletag+ "</TABLE></BODY></HTML>"
- ファイル書出し
// 上から続いて…
// まず、Subroutine化しておく…
function createHTML(fso,path,cntx,newfile){
var htmlpath = path + "\\" + newfile;
var stream = fso.CreateTextFile(htmlpath, true, false);
stream.Write(cntx);
stream.Close();
return(htmlpath);
}
// 上記関数使用
var htmlfilepath = createHTML(fso,crntFolder,htmltag,"index.html");
任意の数でグループ化する †
var ary = "a,d,t,h,a,e,f,a,fi,p,h,ed,df,qe,gb,n,m,jre,sd,a,f,er"
var spl = ary.split(",");
var num = spl.length;
var dev = 4;
var txt = "";
for(i=0;i<num;i=i+dev){
for(j=i;j<i+dev;j++){
if(spl[j]){txt += spl[j] + ","}
else{break}
}
txt = txt.substr(0,txt.length-1);
txt += "\n";
}
txt = txt.substr(0,txt.length-1);
最新の20件
2010-11-18
2011-06-13
2010-10-13
2011-01-11
2010-09-28
2010-10-24
2009-07-15
2009-11-07
2011-04-03
2011-03-07
2011-01-18
2009-08-16
2011-08-10
2013-03-14
2012-04-18
2012-04-07
2012-03-23
2012-02-19
2012-01-31
2012-01-05
今日の3件
- counter: 133
- today: 1
- yesterday: 0
- online: 1