📄 accountquery.asp
字号:
function tmpSelectYearInnerHTML(strYear)
{
if (strYear.match(/\D/)!=null){alert("年份输入参数不是数字!");return;}
var m = (strYear) ? strYear : new Date().getFullYear();
if (m < 1000 || m > 9999) {alert("年份值不在 1000 到 9999 之间!");return;}
var n = m - 10;
if (n < 1000) n = 1000;
if (n + 26 > 9999) n = 9974;
var s = "<select Author=meizz name=tmpSelectYear style='font-size: 12px' "
s += "onblur='document.all.tmpSelectYearLayer.style.display=\"none\"' "
s += "onchange='document.all.tmpSelectYearLayer.style.display=\"none\";"
s += "meizzTheYear = this.value; meizzSetDay(meizzTheYear,meizzTheMonth)'>\r\n";
var selectInnerHTML = s;
for (var i = n; i < n + 26; i++)
{
if (i == m)
{selectInnerHTML += "<option value='" + i + "' selected>" + i + "年" + "</option>\r\n";}
else {selectInnerHTML += "<option value='" + i + "'>" + i + "年" + "</option>\r\n";}
}
selectInnerHTML += "</select>";
document.all.tmpSelectYearLayer.style.display="";
document.all.tmpSelectYearLayer.innerHTML = selectInnerHTML;
document.all.tmpSelectYear.focus();
}
function tmpSelectMonthInnerHTML(strMonth)
{
if (strMonth.match(/\D/)!=null){alert("月份输入参数不是数字!");return;}
var m = (strMonth) ? strMonth : new Date().getMonth() + 1;
var s = "<select Author=meizz name=tmpSelectMonth style='font-size: 12px' "
s += "onblur='document.all.tmpSelectMonthLayer.style.display=\"none\"' "
s += "onchange='document.all.tmpSelectMonthLayer.style.display=\"none\";"
s += "meizzTheMonth = this.value; meizzSetDay(meizzTheYear,meizzTheMonth)'>\r\n";
var selectInnerHTML = s;
for (var i = 1; i < 13; i++)
{
if (i == m)
{selectInnerHTML += "<option value='"+i+"' selected>"+i+"月"+"</option>\r\n";}
else {selectInnerHTML += "<option value='"+i+"'>"+i+"月"+"</option>\r\n";}
}
selectInnerHTML += "</select>";
document.all.tmpSelectMonthLayer.style.display="";
document.all.tmpSelectMonthLayer.innerHTML = selectInnerHTML;
document.all.tmpSelectMonth.focus();
}
function closeLayer()
{
document.all.meizzDateLayer.style.display="none";
}
function document.onkeydown()
{
if (window.event.keyCode==27)document.all.meizzDateLayer.style.display="none";
}
function IsPinYear(year)
{
if (0==year%4&&((year%100!=0)||(year%400==0))) return true;else return false;
}
function GetMonthCount(year,month)
{
var c=MonHead[month-1];if((month==2)&&IsPinYear(year)) c++;return c;
}
function GetDOW(day,month,year)
{
var dt=new Date(year,month-1,day).getDay()/7; return dt;
}
function meizzPrevY()
{
if(meizzTheYear > 999 && meizzTheYear <10000){meizzTheYear--;}
else{alert("年份超出范围(1000-9999)!");}
meizzSetDay(meizzTheYear,meizzTheMonth);
}
function meizzNextY()
{
if(meizzTheYear > 999 && meizzTheYear <10000){meizzTheYear++;}
else{alert("年份超出范围(1000-9999)!");}
meizzSetDay(meizzTheYear,meizzTheMonth);
}
function meizzToday()
{
meizzTheYear = new Date().getFullYear();
meizzTheMonth = new Date().getMonth()+1;
meizzSetDay(meizzTheYear,meizzTheMonth);
}
function meizzPrevM()
{
if(meizzTheMonth>1){meizzTheMonth--}else{meizzTheYear--;meizzTheMonth=12;}
meizzSetDay(meizzTheYear,meizzTheMonth);
}
function meizzNextM()
{
if(meizzTheMonth==12){meizzTheYear++;meizzTheMonth=1}else{meizzTheMonth++}
meizzSetDay(meizzTheYear,meizzTheMonth);
}
function meizzSetDay(yy,mm)
{
meizzWriteHead(yy,mm);
for (var i = 0; i < 37; i++){meizzWDay[i]=""};
var day1 = 1,firstday = new Date(yy,mm-1,1).getDay();
for (var i = firstday; day1 < GetMonthCount(yy,mm)+1; i++){meizzWDay[i]=day1;day1++;}
for (var i = 0; i < 37; i++)
{ var da = eval("document.all.meizzDay"+i)
if (meizzWDay[i]!="")
{ da.innerHTML = "<b>" + meizzWDay[i] + "</b>";
da.style.backgroundColor = (yy == new Date().getFullYear() &&
mm == new Date().getMonth()+1 && meizzWDay[i] == new Date().getDate()) ? "#FFD700" : "#ADD8E6";
da.style.cursor="hand"
}
else{da.innerHTML="";da.style.backgroundColor="";da.style.cursor="default"}
}
}
function meizzDayClick(n)
{
var yy = meizzTheYear;
var mm = meizzTheMonth;
if (mm < 10){mm = "0" + mm;}
if (outObject)
{
if (!n) {outObject.value=""; return;}
if ( n < 10){n = "0" + n;}
outObject.value= yy + "-" + mm + "-" + n ;
closeLayer();
}
else {closeLayer(); alert("您所要输出的控件对象并不存在!");}
}
meizzSetDay(meizzTheYear,meizzTheMonth);
// -->
</script>
<script language=JavaScript>
var onecount,M,N;
onecount=0;
subcat = new Array();
<%
I=0
strSQL="Select * from T_DNS_AccountType"
Set Rs= Server.CreateObject("ADODB.Recordset")
Rs.open strSQL,Cn,1,1
While Not Rs.Eof
%>
subcat[<%=I%>] = new Array('<%=Rs("TypeName")%>','<%=Rs("TypeCode")%>');
<%
Rs.MoveNext
I=I+1
WEnd
Rs.Close
Cn.Close
%>
onecount=<%=I%>;
M=3;
subcat1 = new Array();
subcat1[0] = new Array('正常','1');
subcat1[1] = new Array('待审','2');
subcat1[2] = new Array('作废','3');
N=4;
subcat2 = new Array();
subcat2[0] = new Array('发送','1');
subcat2[1] = new Array('成功','2');
subcat2[2] = new Array('失败','3');
subcat2[3] = new Array('无效','4');
function changelocation(locationid) {
document.form3.TypeCode.length = 1;
document.form3.UAStat.length = 1;
var locationid=locationid;
var i;
if(locationid==1) {
for (i=0;i < onecount; i++) {
document.form3.TypeCode.options[document.form3.TypeCode.length] = new Option(subcat[i][0], subcat[i][1]);}
}
//if (document.form3.TypeCode.length>1) document.form3.TypeCode.selectedIndex=1;
if(locationid==4) {
for (i=0;i < N; i++) {
document.form3.UAStat.options[document.form3.UAStat.length] = new Option(subcat2[i][0], subcat2[i][1]);}
} else {
for (i=0;i < M; i++) {
document.form3.UAStat.options[document.form3.UAStat.length] = new Option(subcat1[i][0], subcat1[i][1]);}
}
//if (document.form3.UAStat.length>1) document.form3.UAStat.selectedIndex=1;
}
</script>
<table width="360" cellspacing="0" cellpadding="0" border="0" align="center">
<tr>
<td>
<table width="100%" border="0" cellpadding="2" cellspacing="1" bgcolor="<%=Opt_Table_BGColor%>">
<form name="form3" action="" method="post">
<input type="hidden" name="act" value="0">
<tr height="24">
<td bgcolor="<%=Opt_TR_BGColor%>" align="center">
凭证编号
</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<input type="text" name="UAVoucher" size="20" maxlength="30" class="input" value="<%=UAVoucher%>">
</td>
</tr>
<tr height="24">
<td bgcolor="<%=Opt_TR_BGColor%>" align="center">
财务类型
</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<select name="UAType" class="input" onChange="changelocation(this.options[this.selectedIndex].value)">
<Option value="">全部</Option>
<Option value="1">后台财务</option>
<Option value="2">客户订单</option>
<Option value="3">综合业务</option>
<Option value="4">在线充值</option>
</select>
</td>
</tr>
<tr height="24">
<td bgcolor="<%=Opt_TR_BGColor%>" align="center">
款项类型
</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<select name="TypeCode" class="input">
<Option value="">全部</Option>
</select>
</td>
</tr>
<tr height="24">
<td bgcolor="<%=Opt_TR_BGColor%>" align="center">
状态
</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<select name="UAStat" class="input">
<Option value="">全部</Option>
</select>
</td>
</tr>
<tr height="24">
<td bgcolor="<%=Opt_TR_BGColor%>" align="center">
发生金额
</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<input type="text" name="UAMoney" size="20" class="input" value="<%=UAMoney%>">
元
</td>
</tr>
<tr height="24">
<td bgcolor="<%=Opt_TR_BGColor%>" align="center">
备注
</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<input type="text" name="OtherInfo" size="20" maxlength="30" class="input" value="<%=OtherInfo%>">
</td>
</tr>
<tr height="24">
<td bgcolor="<%=Opt_TR_BGColor%>" align="center">
时间
</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<input type="text" name="FromTime" size="10" maxlength="10" class="input" onfocus="setday(this)" value="<%=FromTime%>">
至
<% if ToTime="" then %>
<input type="text" name="ToTime" size="10" maxlength="10" class="input" onfocus="setday(this)" value="<%=DatePart("yyyy",now)%>-<%=DatePart("m",now)%>-<%=DatePart("d",now)%>">
<% else %>
<input type="text" name="ToTime" size="10" maxlength="10" class="input" onfocus="setday(this)" value="<%=ToTime%>">
<% end if %>
</td>
</tr>
<tr height="26">
<td bgcolor="<%=Opt_TD_BGColor2%>" colspan="2" align="center">
<input type="submit" class="button" value=" 查询 ">
</td>
</tr>
</form>
</table>
</td>
</tr>
</table>
<%
Call PrintPageBottom
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -