腳本表格
<html>
<head>
<style>
*{margin:0;padding:0;}
table{border-collapse:collapse;}
td {
border-right: 1px solid #C1DAD7;
border-bottom: 1px solid #C1DAD7;
background: #fff;
font-size:11px;
padding: 6px 6px 6px 12px;
color: #4f6b72;
}
</style>
</head>
<body >
<h3>第一種方式</h3>
<script>
document.write("<table style='border:1px solid black'>")
for (var i=0;i<1;i++){
document.write("<tr >")
for (var j=0;j<4;j++){
document.write("<td >"+(i*4+j)+"</td>");
}
document.write("</tr>")
}
document.write("</table>");
</script>
<h3>第二種方式</h3>
<script>
(function createTable() {
var ta = document.createElement("table");
ta.setAttribute("style","border:1px solid black");
ta.insertRow();
ta.rows[0].insertCell();
ta.rows[0].cells[0].appendChild(document.createTextNode("0"));
ta.rows[0].insertCell();
ta.rows[0].cells[1].appendChild(document.createTextNode("1"));
ta.rows[0].insertCell();
ta.rows[0].cells[2].appendChild(document.createTextNode("2"));
ta.rows[0].insertCell();
ta.rows[0].cells[3].appendChild(document.createTextNode("3"));
document.body.appendChild(ta);
})()
</script>
</body >
</html>
㈡ 在JS腳本中插入一個表格該怎麼寫呢
老弟，0到100是101個數好不好。。。沒辦法10行。。。給你個0到99的
<div id="container"></div>
<SCRIPT LANGUAGE="JavaScript">
<!--
var tbl = "<TABLE>";
for (var i = 0; i < 10; i++)
{
var td = "";
for (var j = 0; j < 10; j++ ) {
td = td + "<td>" + (i * 10 + j) + "</td>";
}
tbl = tbl + "<tr>" + td + "</tr>";
}
tbl = tbl + "</TABLE>";
document.getElementById("container").innerHTML = tbl;
//-->
</SCRIPT>
㈢ 如何使用bat腳本實現刪除表格數據，同時刪除對應數據圖片
不清楚你的實際文件/情況，僅以問題中的樣例/說明為據；以下代碼復制粘貼到記事本，另存為xx.bat，編碼選ANSI，跟要處理的文件放一起雙擊運行
@echo off&mode con lines=3000
rem 根據給出的名稱列表，將當前目錄里對應名稱的jpg圖片文件刪除
set #=Any question&set _=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%_% %z%
cd /d "%~dp0"
for /f "delims=:" %%a in ('type "%~f0"^|findstr /in "^exit$"') do set "last=%%a"
for /f "skip=%last% delims=" %%a in ('type "%~f0"') do (
if exist "%%~a.jpg" (
del /a /f /q "%%~a.jpg"
) else (echo;"%%~a" 未找到)
)
echo;%#% +%$%%$%/%_% %z%
pause
exit
A
B
C
D
E
F
G
X
……
㈣ 用腳本編寫一個表格的生成(3行3列)，急求
你粘貼到VBA編輯器，執行代碼就行。
Sub Word_3x3網格()
'
ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=3, NumColumns:= _
3, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
wdAutoFitFixed
With Selection.Tables(1)
If .Style <> "網格型" Then
.Style = "網格型"
End If
.ApplyStyleHeadingRows = True
.ApplyStyleLastRow = True
.ApplyStyleFirstColumn = True
.ApplyStyleLastColumn = True
End With
Application.WindowState = wdWindowStateMaximize
End Sub
㈤ VBscript腳本語言 生成表格
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>自動生成表格</title>
<script language="vbscript">
sub hua(a,b)
a=document.form.row.value
b=document.form.column.value
document.write "<table border= 1 align=center>"
for i=1 to int(a)
document.write"<tr>"
for j=1 to int(b)
document.write "<td>" &i& "*" & j&"</td>"
next
document.write"</tr>"
next
document.write "</table>"
end sub
</script>
</head>
<body>
<form id="form" name="form" method="post" action="">
<table width="385" border="1" align="center" cellspacing="1">
<tr>
<td width="134">請輸入行數：</td>
<td width="238"><label for="row"></label>
<input type="text" name="row" id="row" /></td>
</tr>
<tr>
<td>請輸入列數：</td>
<td><label for="column"></label>
<input type="text" name="column" id="column" />
<label for="btn"></label>
<input type="button" name="btn" id="btn" value="生成" onclick="hua 2,3"/></td>
</tr>
</table>
</form>
</body>
</html>
㈥ 如何用shell腳本製作Excel統計表格
用 perl 的 mole 才可讀寫 MS excel 的 xls 格式,
Spreadsheet::WriteExcel
Spreadsheet::ParseExcel
Win32::OLE
OLE::Storage_Lite
如用 shell 則必須改成文本格式(text file)
這里有個鏈結，看看
http://www.ibm.com/developerworks/library/l-pexcel/index.html
㈦ 如何使用JS腳本添加表格的行和列
<table border="1">
<tbody id="new">
<tr> <td>a</td> <td>1</td> </tr>
<tr> <td>b</td> <td>2</td> </tr>
<tr> <td>c</td> <td>3</td> </tr>
</tbody>
</table>
<script type="text/javascript">
var table = document.getElementById("new");
// 增加行
var newTR = document.createElement("tr");
var newTD1 = document.createElement("td");
var newText1 = document.createTextNode("d");
var newTD2 = document.createElement("td");
var newText2 = document.createTextNode("4");
newTD1.appendChild(newText1);
newTD2.appendChild(newText2);
newTR.appendChild(newTD1);
newTR.appendChild(newTD2);
table.appendChild(newTR);
//增加列
var tr = table.getElementsByTagName("tr");
for(var i=0; i<tr.length; i++) {
var newTD = document.createElement("td");
var newText = document.createTextNode(i);
newTD.appendChild(newText);
tr[i].appendChild(newTD);
}
</script>
㈧ 如何用腳本一次性設置表格<td>的樣式
可以的，你可以這樣設置
<style>
.tdClass1{
...
}
.tdClass2{
...
}
.tdClass3{
...
}
</style>
<table id='table1'>
<tr>
<td>...</td>
</tr>
</table>
<table id='table21'>
<tr>
<td>...</td>
</tr>
</table>
<table id='table3'>
<tr>
<td>...</td>
</tr>
</table>
<script>
function myBodyOnLoad(){
var table1 = document.getElementById('table1');
var tds = table1.getElementsByTagName('td');
var i;
for (i = 0; i < tds.length; i++) {
tds[i].className = 'tdClass1';
}
var table2 = document.getElementById('table2');
tds = table2.getElementsByTagName('td');
for (i = 0; i < tds.length; i++) {
tds[i].className = 'tdClass2';
}
var table3 = document.getElementById('table3');
tds = table1.getElementsByTagName('td');
for (i = 0; i < tds.length; i++) {
tds[i].className = 'tdClass3';
}
}
</script>
㈨ 做電影腳本表格用office什麼
做表格的專用程序是Microsoft Office Excel。
Excel本身的空白文檔就是表格形式，只需根據自己的需要填入數據，並對表格進行調整就可以快速完成表格的製作。
如果需要對表格進行列印，可以用Word程序進行轉換。先用Excel製作表格，復制之後粘貼到Word空白文檔中，對頁面進行調整就可以用列印。
㈩ 有什麼腳本可以讓表格中的數字自動加1
可以用vbs腳本的sendkeys
（可以直接用txt來編寫，寫完之後改為vbs後綴就行了）
例如：
set wshshell=wscript.createobject("wscript.shell") '創建實例
wshshell.Sendkeys"{BACKSPACE}" '刪除前一個
wshshell.Sendkeys"2"
WScript.Sleep 1000 '單位為毫秒
wshshell.Sendkeys"{BACKSPACE}"
wshshell.Sendkeys"3"
WScript.Sleep 1000
wshshell.Sendkeys"{BACKSPACE}"
wshshell.Sendkeys"4"
WScript.Sleep 1000
wshshell.Sendkeys"{BACKSPACE}"
wshshell.Sendkeys"5"
…………
把輸入位置放在你想要輸的地方就行了
還有一種不是時間的，自己控制：
dim a,ctr '定義變數
set wshshell=wscript.createobject("wscript.shell")
ctr=1 '視情況隨便改
do 'do……loop循環
a=msgbox("+1",4096+vbOKCancel)
if a=vbOK then
WScript.Sleep 2000 '在這段時間里點一下你要輸入的地方
wshshell.Sendkeys"{BACKSPACE}"
WScript.Sleep 300
wshshell.Sendkeys ctr
ctr=ctr+1 '每次輸入的是上一個數加1
elseif a=vbCancel then
exit do
end if
loop
'同樣為vbs腳本