轉帖自草惜草BLOG原創
http://blog.csdn.net/caoxicao/services/trackbacks/498022.aspx
http://blog.csdn.net/caoxicao/archive/2005/10/09/498059.aspx
http://blog.csdn.net/caoxicao/archive/2005/10/09/498061.aspx
http://blog.csdn.net/caoxicao/archive/2005/10/09/498066.aspx
1. 幾個常用函數
Round(pi, 2) 四舍五入
FormatNumber(k,4) ' 把 k 格式化為帶四位小數點的數。
eg. 如果k =20000則顯示為20,000.00；如果把formatnumber(k,0)則為20,000
Replace(expression,find,replacewith) '返回一字符串，其中指定的子串已被另一個子串替換
Left(String,Length) '返回指定數目的從字符串的左邊算起的字符串。
Split(expression[, delimiter[, count[, start]]]) '返回基于 0 的一維數組，其中包含指定數目的子字符串。
eg. 常用這個 Split(String,[delimiter]) ' 用delimiter(用于標識子字符串界限的字符)來劃分字符串
Instr(String1,String2) '返回某字符串在另一字符串中第一次出現的位置
eg1. if instr(addation,"密碼配置表")<>0 then '說明存在
eg2. if instr(str,”AP”) >0 不好區分str = (AP,AP&AC),此時只要變為（’AP’,’AP&AC’）,再用instr(str,”’AP’”)
2. 彈出窗口Pick值
function pickupSP(spdisid,pjnum,pdcode)
{
window.opener.<%=theForm%>.RefNum<%=Spid%>.value=spdisid;
window.opener.<%=theForm%>.LineS<%=Spid%>.value=pjnum;
window.opener.<%=theForm%>.kokey<%=Spid%>.value=pdcode;
window.close();
}
3. ASP控制圖片顯示的大小（等比例縮放）
<HTML>
<HEAD>
<TITLE> New Document </TITLE>
<script language="JavaScript">
<!--
var flag=false;
function DrawImage(ImgD){
var image=new Image();
image.src=ImgD.src;
if(image.width>0 && image.height>0){
flag=true;
if(image.width/image.height>= 164/112){
if(image.width>164){
ImgD.width=164;
ImgD.height=(image.height*164)/image.width;
}else{
ImgD.width=image.width;
ImgD.height=image.height;
}
ImgD.alt=image.width+"x"+image.height;
}
else{
if(image.height>112){
ImgD.height=112;
ImgD.width=(image.width*112)/image.height;
}else{
ImgD.width=image.width;
ImgD.height=image.height;
}
ImgD.alt=image.width+"x"+image.height;
}
}
}
//-->
</script>
</HEAD>
<BODY>
<a href="./img.jpg" target="_blank"><img src="./img.jpg" border="0" width="164" height="112" onload="javascript:DrawImage(this);"></a>
</BODY>
</HTML>
4. ASP中對數據庫表的操作(INSERT/UPDATE/DELETE),可使用事務處理,并支持多事務處理.
在ASP的數據庫對象鏈接對象中,提供了一下屬性:
BeginTrans 事務開始
CommitTrans 事務提交
RollbackTrans 事務回滾
<%
On Error Resume Next ’錯誤發生后繼續處理
'Asp中使用事務
Set conn=Server.CreateObject("ADODB.Connection")
conn.Open "course_dsn","course_user","course_password"
conn.begintrans '開始事務
sql="delete from user_info"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,3
if conn.errors.count>0 then '有錯誤發生
conn.rollbacktrans '回滾
set rs=nothing
conn.close
set conn=nothing
response.write "交易失敗，回滾至修改前的狀態！"
response.end
else
conn.committrans '提交事務
set rs=nothing
conn.close
set conn=nothing
response.write "交易成功！"
response.end
end if
%>
在ASP中,不提供事務的結束,BeginTrans只作用于自己的域,類似于變量聲明一樣,如果在函數體內BeginTrans,則事物只作用于本函數體,如果BeginTrans在函數體外,處于頁面級,則事務的作用域從BeginTrans開始,到頁面的結束均處于事務的管理狀態下.
5. EasySales數據庫操作
dim objCon,objRst,objsql
dim companyid
Set objCon = Server.CreateObject("ADODB.Connection")
objCon.Open SYSDNS,SYSNAME,SYSPASSWORD
Set objRst = Server.CreateObject("ADODB.RecordSet")
objsql="select * from PasswordConfig where companyid='"&session("CompanyID")&"'"
objRst.Open objsql,objCon,1,3
6. html格式郵件發送
HTML = "<html>"
HTML = HTML & "<head>"
HTML = HTML & "<title>Sending CDONTS Email Using HTML</title>"
HTML = HTML & "<link href="../cn/new.css" rel="stylesheet" type="text/css">"
HTML = HTML & "</head>"
HTML = HTML & "<body bgcolor=""FFFFFF"">"
HTML = HTML & "<p><font size=7>"
HTML = HTML & "This is a test mail in html<br>"
HTML = HTML & "Mail content here ...</font></p>"
HTML = HTML & "</body>"
HTML = HTML & "</html>"
dim StrRecEmail,StrPosEmail,StrSubject,StrBody
StrRecEmail=request("email")
StrPosEmail="yufh@alleasy.com.cn"
StrSubject="資料下載通知函"
StrBody=HTML
7. input是下劃線
style="BORDER-RIGHT: #f7f7f7 0px solid; BORDER-TOP: #f7f7f7 0px solid; FONT-SIZE: 9pt; BORDER-LEFT: #f7f7f7 0px solid; WIDTH: 110px; BORDER-BOTTOM: #c0c0c0 1px solid; HEIGHT: 16px; BACKGROUND-COLOR: #f7f7f7"
8. Session & Cookie
寫入一個SESSION：
Session["username"])="aa";
Session("username")="aa"
讀取一個SESSINN：
string username= Session["username"];
dim username=Session("username")
Cookie與此用法大致相同
9. 幾個VB中的常數
下列常數由 Visual Basic for Applications 中的類型庫定義，可用來在代碼中的任何地方代替實際值：
常數 等于 描述
vbCrLf Chr(13) + Chr(10) 回車符與換行符結合
vbCr Chr(13) 回車符
vbLf Chr(10) 換行符
vbNewLine Chr(13) + Chr(10) 平臺指定的新行字符；適用于當前平臺
vbNullChar Chr(0) 值為 0 的字符
vbNullString 值為 0 的字符串 用來調用外部過程；與長度為零的字符串 ("") 不同
vbObjectError -2147221504 用戶定義的錯誤號應當大于該值，例如：
Err.Raise Number = vbObjectError + 1000
vbTab Chr(9) Tab 字。
vbBack Chr(8) 退格字符
10. 按鈕為不可用
<%if rsView.eof and rsView.bof then %> ‘ 這里有個大問題，下文再說
<input name="submit" type='submit' value='對選定用戶解鎖' disabled>
<%else%>
<input name="submit" type='submit' value='對選定用戶解鎖' >
</td>
<%end if%>
response.write"<SCRIPT language=JavaScript>alert('找不到！');"
response.write"javascript:history.go(-1)</SCRIPT>"
end if
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
這個是跳轉。
<script language="javascript">
alert('<%=intOperationInfo%>');
window.navigate('ChangePwd.asp');
</Script>
dim checkpwdconfig
checkpwdconfig=split(addation,"/")
%>
<script language="javascript">
alert("<%=checkpwdconfig(0)%>")
</script>
function openaddnew()
{
subWindow=window.open("../Edit/PasswordConfigEdit.asp?method=new",'','scrollbars=yes,left=120,top=60,height=250,width=500,menubar=no,location=no,toolbar=no,resizable=yes','')
subWindow.opener = this;
}
</script>
<a href=""＃"">請修改密碼 onClick="openaddnew()"</a>
<img name=submit1 src="../button_new<%=session("languageid")%>.gif" onClick="openaddnew()">
<%
if request("pageno")<>"" then
pageno=int(request("pageno"))
else
pageno=1
end if
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,3
rs.pagesize=20
if rs.eof then
pageno=0
else
rs.absolutepage=pageno
end if
%>
==========================================
共<%=rs.recordcount%>條,<%=pageno%>/<%=int(rs.pagecount)%>頁,每頁<%=rs.pagesize%>條
<a href="manage.asp?pageno=1">首頁</a>
<%if pageno>1 then%>
<a href="manage.asp?pageno=<%=int(pageno)-1%>">上一頁</a>
<%
end if
if int(pageno)<>int(rs.pagecount)then
%>
<a href="manage.asp?pageno=<%=int(pageno+1)%>">下一頁</a>
<%end if%>
<a href="manage.asp?pageno=<%=int(rs.pagecount)%>">尾頁</a>
<%rs.close%>
<%
%>
rs.Open sql,Conn,1,3
rs("usermail")=Request("usermail")
rs("userhome")=Request("userhome"))
rs.update
rs.close
<OBJECT id=closes type="application/x-oleobject" classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11"><param name="Command" value="Close">
</object>
</head>
<body>
<input type="button" value="點擊我關閉窗口" onclick="closes.Click();">
</body>
<tr>
<td> </td>
</tr>
</table>
Email : /^\w+([-+.]\w+)*@\w+([-.]\\w+)*\.\w+([-.]\w+)*$/,
Phone : /^((\(\d{3}\))|(\d{3}\-))?(\(0\d{2,3}\)|0\d{2,3}-)?[1-9]\d{6,7}$/,
Mobile : /^((\(\d{3}\))|(\d{3}\-))?13\d{9}$/,
Url : /^http:\/\/[A-Za-z0-9]+\.[A-Za-z0-9]+[\/=\?%\-&_~`@[\]\':+!]*([^<>\"\"])*$/,
IdCard : /^\d{15}(\d{2}[A-Za-z0-9])?$/,
Currency : /^\d+(\.\d+)?$/,
Number : /^\d+$/,
Zip : /^[1-9]\d{5}$/,
QQ : /^[1-9]\d{4,8}$/,
Integer : /^[-\+]?\d+$/,
Double : /^[-\+]?\d+(\.\d+)?$/,
English : /^[A-Za-z]+$/,
Chinese : /^[\u0391-\uFFE5]+$/,
UnSafe :/^(([A-Z]*|[a-z]*|\d*|[-_\~!@#\$%\^&\*\.\(\)\[\]\{\}<>\?\\\/\'\"]*)|.{0,5})$|\s/,
if len(trim(str))>=28 then
title=left(trim(str),27)&"..."
else
title=trim(str)
end if
end function
<!--//
if (navigator.appName == 'Netscape')
var language = navigator.language;
else
var language = navigator.browserLanguage;
if (language.indexOf('en') > -1) document.location.href = 'en/index.asp';
else if (language.indexOf('zh') > -1) document.location.href = 'cn/index.asp';
else
document.location.href = 'cn/index.asp';
// End -->
</script>
21. 嵌入另一頁
<iframe class="TBGen" style="top:2px" ID="UploadFiles" src="upload.asp" frameborder=0 scrolling=no width="250" height="25"></iframe>
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
其實也可以用
<!--#include file="fuck.asp"-->
22. 全部選定
<SCRIPT language=javascript>
function CheckAll(form)
{
for (var i=0;i<form.elements.length;i++)
{
var e = form.elements[i];
if (e.Name != "chkAll")
e.checked = form.chkAll.checked;
}
}
</script>
引用：
<td width="250" height="30"><input name="chkAll" type="checkbox" id="chkAll" onclick=CheckAll(this.form) value="checkbox">
選中本頁顯示的所有
</td>
小格：
<input name='username' type='checkbox' id="username" value="<%=cstr(rsView("username"))%>">
23. 如何處理頁面執行時發生的錯誤？
<%@ LANGUAGE="VBScript" %>
<%
Response.Buffer = True'
打開頁面緩沖
On Error Resume Next '
打開錯誤處理
…………' ASP
代碼
%>
<%
If Err.Number <> 0 Then '
錯誤處理
Response.Clear '
清除緩沖區
%>
<HTML>'
顯示錯誤信息頁面
<HEAD>
<TITLE>
頁面錯誤報告
</TITLE>
</HEAD>
<BODY BGCOLOR="#C0C0C0">
<font color=red>
<p>
頁面錯誤報告
</p>
錯誤號
:<%= Err.Number %><BR>
錯誤描述
:<%= Err.Description %><BR>
錯誤源
:Source <%= Err.Source %><BR>
錯誤發生行
:<%= Err.Line %><BR>
</BODY>
</HTML>
<%
End If
%>
24. 收藏夾圖標 .
在
HEAD
部分加入下面的內容
:
<LINK REL="SHORTCUT ICON" HREF=
http://www.alleasy.com.cn/alleasy.ico
>
在地址欄加入圖標（圖標必須是
.ico
格式，并且要加入收藏后才有效）
在
HEAD
里加入
<link rel="shortcut icon" href="favicon.ico">
25. 校驗提交表單（正則表達式應用）
<script language="JavaScript">
<!--
function CheckForm()
{
if (LoginID.value =="")
{
alert("
請填寫您的登錄名！
");
LoginID.focus();
return false;
}
var filter=/^\s*[.A-Za-z0-9_-]{5,15}\s*$/;
if (!filter.test(LoginID.value)) {
alert("
用戶名填寫不正確
,
請重新填寫！可使用的字符為（
A-Z a-z 0-9 _ - .)
長度不小于
5
個字符，不超過
15
個字符，注意不要使用空格。
");
LoginID.focus();
LoginID.select();
return false;
}
if (Password.value =="")
{
alert("
請填寫您的密碼！
");
Password.focus();
return false;
}
var filter=/^\s*[.A-Za-z0-9_-]{5,15}\s*$/;
if (!filter.test(Password.value)) {
alert("
密碼填寫不正確
,
請重新填寫！可使用的字符為（
A-Z a-z 0-9 _ - .)
長度不小于
5
個字符，不超
過
15
個字符，注意不要使用空格。
");
Password.focus();
Password.select();
return false;
}
if (Password.value != ConfirmPassword.value)
{
alert("
請兩次填寫的密碼不一致，請重新填寫！
");
ConfirmPassword.focus();
return false;
}
if (CompanyName.value =="")
{
alert("
請填寫貴公司名稱！
");
CompanyName.focus();
return false;
}
var filter=/^[a-zA-Z][a-zA-Z0-9._-]*@([a-zA-Z0-9-_]+\.)+(com|gov|net|com\.cn|edu\.cn)$/;
if(!filter.test(document.myform.Email.value)){
alert("
郵箱格式不正確
!");
document.myform.Email.focus();
return false;
}
myform.submit();
return true;
}
//-->
</SCRIPT>
統一一下，以后都這樣寫
<form method="POST" name="myform" action="Checkreg.asp" >
</form>
<input type="button" name="Submit" value=" 提交 " onClick="CheckForm();">
26. 循環
<%
dim sql,rs
set rs=server.createobject("ADODB.recordset")
sql="select * from news where bigclassname='
解決方案
'"
rs.open sql,conn,1,3
for k=1 to rs.recordcount
if rs.eof then
exit for
else
%>
<tr>
<td>
asfasdf
</td>
</tr>
<%
rs.movenext
end if
next
%>
27. 另一個只能輸入數字代碼
<script language=java script>
function check(){
if(isNaN(tt.value))
{
alert("
必須是數字
!");
tt.value="";
}
</script>
<input type="text" name="tt" onkeyup="check();">
28. 有選擇顯示
function showco(va)
{
if (va=="CO")
{
RefNum.style.display=''; //
不再用這個可以直接用
block
buttonsp.style.display='none';
}
if (va=="SP")
{
buttonco.style.display='none';
buttonsp.style.display='';
kokey.style.display='';
}
if (va=="Inventory")
{
RefNum.style.display='none'; //
不顯示
Reftr.style.display="block"; //
顯示
}
調用：
<select name="RefType" style='width:77pt' onChange="showco(this.value)">
<option value="Inventory">Inventory</option>
<option value="CO" >CO</option>
<option value="SP">SP</option>
</select>
選擇顯示行 <tr id="Reftr" name="Reftr" style="display:none"> 也可以用 <div id=”Resftr” ></div>
29. 調試參數顯示規范
Response.Write session("LoginCompanyId")&","&Date&","&Request.Form("Owner")&","&Request.Form("Name")&
//
注意最后沒有
"
只是在，之間用
","
其他用
&&
引用即可
//
也就是說只是用
&","&
中間加一個逗號，其他的該怎么寫，就怎么寫
Response.End
30. 從數據庫填充下拉菜單
<%
sql = "select * from BigClass"
rs.open sql,conn,1,1
%>
<select name="BigClassName" size="1">
<option selected value="<%=trim(rs("BigClassName"))%>"><%=trim(rs("BigClassName"))%></option>
<%
rs.movenext //
不能少，否則重復
do while not rs.eof
%>
<option value="<%=trim(rs("BigClassName"))%>"><%=trim(rs("BigClassName"))%></option>
<%
rs.movenext
loop
rs.close
%>
</select>
// 以下是新方法
<select name="SrcNo">
<%do while not SrcRs.eof%>
<option value="<%=trim(SrcRs("Cost"))%>"
<%
if Trim(SrcComRs("SrcNo")) = Trim(SrcRs("Cost")) then
response.Write "selected"
end if
%>
><%=trim(SrcRs("Cost"))%>
</option>
<%
SrcRs.movenext
loop
SrcRs.close
%>
</select>
31. 確認操作
function ConfirmDel()
{
if(confirm("
確定要刪除嗎？一旦刪除將不能恢復！
"))
return true;
else
return false;
}
<form name="del" method="Post" action="Del.asp" onsubmit="return ConfirmDel();">
==============================================================
我自己用的一個。
function ConfirmReset()
{
if(confirm("
確定取消操作嗎？一旦取消操作將不能恢復！
"))
window.form1.reset();
// return true;
}
<a href="javascript:ConfirmReset();"><img src="button_cance.gif"></a>
32. indexOf() 用法
< 字符串對象 >.indexOf(< 另一個字符串對象 >[, < 起始位置 >]) ；
該方法從
<
字符串對象
>
中查找
<
另一個字符串對象
>
（如果給出
<
起始位置
>
就忽略之前的位置），如果找到了，就返回它的位置，沒有找到就返回“
-1
”。所有的“位置”都是從零開始的。
eg. Str.indexOf(“AP”)>-1
說明
str
中存在
”AP”
字符串
33. 生成流水號
<%
if request.form("Modf") <> "" then
Dim
rs
Dim sql
Dim BugID
dim today
today=date()
toyear=year(today)
toyear=toyear*10000
tomonth= month(today)
tomonth=tomonth*100
tonow=day(today)
Serialnum = toyear + tomonth + tonow
Serialnum = Serialnum*10000+1
set rs = Server.CreateObject("ADODB.recordset")
sql = "select top 1 * from buglist order by SubmitDate desc"
rs.open sql,conn,1,3
if
not rs.eof then
Dim OldSerialnum
OldSerialnum = Rs("BugID")
OldSerialnum = right(OldSerialnum,12)
Serial = right(Serialnum,12)
if OldSerialnum - Serial >= 0 then
Serialnum = OldSerialnum + 1
end if
end if
BugID = "ES"&request("ProductVersion")&Serialnum
34. 響應回車
function getdata(what,whatid)
{
if (event.keyCode==13)
……
<input name="SerialNum<%=i%>"
type="text" onKeyDown="getdata(window.form1.SerialNum<%=i%>.value,<%=i%>)">
35. 關閉窗口前刷新父頁面
response.write "<script language = javascript>"
response.write "javascript:opener.location.reload(); "
response.write "javasript:window.close();</script>"
36. JS 事件
事件 / 描述
onblur
事件
發生在窗口失去焦點的時候。
onchange
事件
發生在文本輸入區的內容被更改，然后焦點從文本輸入區移走之后。
onclick
事件
發生在對象被單擊的時候。
onerror
事件
發生在錯誤發生的時候。
onfocus
事件
發生在窗口得到焦點的時候。
onload
事件
發生在文檔全部下載完畢的時候。
onmousedown
事件
發生在用戶把鼠標放在對象上按下鼠標鍵的時候。參考
onmouseup
事件。
onmouseout
事件
發生在鼠標離開對象的時候。參考
onmouseover
事件。
onmouseover
事件
發生在鼠標進入對象范圍的時候。
onmouseup
事件
發生在用戶把鼠標放在對象上鼠標鍵被按下的情況下，放開鼠標鍵的時候。
onreset
事件
發生在表單的“重置”按鈕被單擊（按下并放開）的時候。
onresize
事件
發生在窗口被調整大小的時候。
onsubmit
事件
發生在表單的“提交”按鈕被單擊（按下并放開）的時候。
onunload
事件
發生在用戶退出文檔（或者關閉窗口，或者到另一個頁面去）的時候。
onSelect
當
Text
或
Textarea
對象中的文字被加亮后，引發該事件。
onFocus
當用戶單擊
Text
或
textarea
以及
select
對象時，產生該事件。
onBlur
當
text
對象或
textarea
對象以及
select
對象不再擁有焦點、而退到后臺時，引發該文件
.
onDragDrog
拖放時發生
onLoseCapture
onDblClick
鼠標雙擊事件
onKeyPress
當鍵盤上的某個鍵被按下并且釋放時觸發的事件
.[
注意
:
頁面內必須有被聚焦的對象
]
onKeyDown
當鍵盤上某個按鍵被按下時觸發的事件
[
注意
:
頁面內必須有被聚焦的對象
]
onKeyUp
當鍵盤上某個按鍵被按放開時觸發的事件
[
注意
:
頁面內必須有被聚焦的對象
]
onAbort
圖片在下載時被用戶中斷
onBeforeUnload
當前頁面的內容將要被改變時觸發的事件
onMove
瀏覽器的窗口被移動時觸發的事件
37. 自動最大化
function window_onload()
{
window.moveTo(-2,-2);
window.resizeTo(screen.availWidth, screen.availHeight);
}
<body onload="window_onload()">
38. 幾個 SQL 技巧
SELECT Area,Territory,username,sum(dealqty) DealQty,count(Projectnum) ProjectQty,sum(TotalAmount) TotalAmountQty,sum(TotalPowerRT) TotalPowerRT
FROM VW_PreviewTerritory
where
username = '
段龍義
' group by area,Territory,username
只要把不需要統計的東西分組就可以了。
select area,count(projectnum) TotalProjectQty,sum(DealQty) TotalDealQty,sum(TotalAmount) TotalAmountQty,sum(TotalPowerRT) TotalPowerRTQty from vw_previewProject where username = 'admin' group by area
這個也是一樣，記住：
count()
只是計數，不管這個字段值是多少。
sum()
是求和，把所有加在一起。
39. Eval 用法
eval("ProducingArea"+i+".style.display = 'none' ;");
單引號不影響
eval("if((window.form1.ProductBaseType"+i+".value!='' && window.form1.ProductBaseType"+(i+1)+".value =='')==true);");
//
錯誤！
if(eval("window.form1.ProductBaseType"+i+".value!='' && window.form1.ProductBaseType"+(i+1)+".value ==''")==true)
//
以后記得凡是有
if
判斷的，把
eval("")
寫在里面，就比較好！
if(confirm(eval("'
確信要在
'+window.form1.ProductBaseType"+(i)+".value+'
后添加子類？
'")))
40. 窗口關閉之前
function window_onbeforeunload(Projectnum)
{
if (event.clientX > document.body.clientWidth && event.clientY < 0 )
{
var oXMLHTTP = new ActiveXObject("Microsoft.XMLHTTP");
oXMLHTTP.open("POST","CheckProjectDeal.asp?Projectnum="+Projectnum,false);
oXMLHTTP.send();
Str=unescape(oXMLHTTP.responseText);
if (unescape(oXMLHTTP.responseText)!="YES")
{
window.event.returnValue="
項目至少需要一個銷售機會！
";
}
}
}
41. 標準表格
***************
* 這個是標題
***************
<table cellspacing=0 cellpadding=0 width="100%" border=0>
<tr>
<td
class=title
nowrap
align=left>
<%response.write Application("LProductManage"&session("LanguageId"))%>
</td>
</tr>
</table>
***************
* 這個是橫線
***************
<table cellspacing=0 cellpadding=0 width="100%" border=0>
<tbody>
<tr>
<td>
</td>
</tr>
<tr class="linecolor">
<td height="2"></td>
</tr>
<tr>
<td class="tdcolor" align=left height=15> </td>
</tr>
</tbody>
</table>
***************
* 這個是表格
***************
<table border=0 cellpadding=0 cellspacing=1 width=100% bgcolor="#d0d090">
<tbody>
<th align="middle" class=light2><b><%=application("Lstatus"&session("languageid"))%></b></th>
<th align="middle" class=light2><b><%=application("LSaleStage"&session("languageid"))%></b></th>
<tr bgColor="white">
<td align="middle"> </td>
<td align="middle"> </td>
</tr>
</tbody>
</table>
邊框 \ 填充 = 0
間隔 ＝ 1
底色 = #d0d090
42. 這也行
for i=2 to num
BaseTypeAllPArr = request("BaseType"&i&"P"&jLoop)&":"&BaseTypeAllPArr
response.Write "
OOOO
"&request("BaseType"&i&"P"&jLoop)&"
OOOO
<br>"
next
43. 標準注釋頭
'' ******************************************************************
'' 文件名 :
'' Copyright (c) 2001-2005 ××信息技術公司軟件部
'' 功能描述 : 產品編輯
'' 參數
'' 牽涉數據表，視圖，存儲過程：自定義函數 dbo.GetSubTreeinfo
margin: 0cm 0cm 0pt;
發表評論
更多文章、技術交流、商務合作、聯系博主
微信掃碼或搜索：z360901061
微信掃一掃加我為好友
QQ號聯系： 360901061
您的支持是博主寫作最大的動力，如果您喜歡我的文章，感覺我的文章對您有幫助，請用微信掃描下面二維碼支持博主2元、5元、10元、20元等您想捐的金額吧，狠狠點擊下面給點支持吧，站長非常感激您！手機微信長按不能支付解決辦法：請將微信支付二維碼保存到相冊，切換到微信，然后點擊微信右上角掃一掃功能，選擇支付二維碼完成支付。
【本文對您有幫助就好】元
評論