این فایل منه که تگ asp و تگ html هم توش هست حالا هر کاری می کنم table بالای صفحه نمی افته می ره پایین می افته و باید با اسکرول عمودی پایین بروم که بتونم ببینمش . کسی می دونه چه جوری باید حلش کنم ؟
کد:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft FrontPage 5.0">
<META http-equiv=Content-Type content="text/html; charset=utf-8">
<TITLE></TITLE>
<script>
function goback() {
history.go(-1);
}
</script>
</HEAD>
<BODY topmargin="0" leftmargin="0">
<div align="right">
<table border=1 dir="rtl" style="MARGIN-TOP: 0px; VERTICAL-ALIGN: top; BORDER-COLLAPSE: collapse" bordercolor="#111111" bordercolor="#111111" cellpadding="0" cellspacing="0" valign=top align="center">
<tr>
<td width="100" valign="top" style="margin-left: 0">
<font face="Tahoma" size="2">شهرستان/اعتبار</font><font face="Tahoma"> </font>
</td>
<%if session("validation")=false then
Response.Redirect("user_gostaresh.asp")
end if%>
<%if (len(trim(Request.QueryString("year")))=0) then %>
<p dir="rtl" align="center"><font face="Tahoma" size="2" color="#008000"><A href="javascirpt:goback()"><%Response.Write ("براي برگشت اينجا را کليک کنيد")%></A></font></p><%
Response.End
else
end if%>
<%
set con1=server.CreateObject("adodb.connection")
con1.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+server.mappath("expenses.mdb")+";Persist Security Info=False"
set rst1=server.CreateObject("adodb.recordset")
strsql1="select shahrestan from shahrestan "
rst1.open strsql1,con1,1,3
%>
<%set con=server.CreateObject("adodb.connection")
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+server.mappath("expenses.mdb")+";Persist Security Info=False"
set rst=server.CreateObject("adodb.recordset")
strsql="select expense from etebar where (sal like '" &trim(Request.QueryString ("year")) &"' and mah='"&trim(Request.QueryString ("mah"))&"') "
rst.open strsql,con,1,3%>
<%for k=1 to rst.recordcount%>
<td nowrap width="100" valign="top" style="margin-left: 0">
<%=rst.fields("expense")%><font face="Tahoma">
<%rst.movenext%>
</font> </td>
<%next%>
</tr>
<%rst.movefirst%>
<%for i=1 to rst1.recordcount ' all shahrestan%>
<tr>
<td width="100" nowrap valign="top" style="margin-left: 0">
<%=rst1.fields("shahrestan")%><font face="Tahoma" size="2"> </font> </td>
<% for j=1 to rst.recordcount ' all expenses%>
<%
strsql2="select etebar from etebar where (sal like '" &trim(Request.QueryString ("year")) &"' and mah='"&trim(Request.QueryString ("mah"))&"' and shahrestan='"&trim(rst1.fields ("shahrestan"))&"' and expense='"&trim(rst.fields ("expense"))&"')"
'response.write(strsql2)
'response.end
set con2=server.CreateObject("adodb.connection")
con2.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+server.mappath("expenses.mdb")+";Persist Security Info=False"
set rst2=server.CreateObject("adodb.recordset")
rst2.open strsql2,con2,1,3 'all etebar%>
<%if rst2.recordcount>0 then%>
<td width="100" nowrap valign="top" style="margin-left: 0">
<%=rst2.fields("etebar")%><font face="Tahoma" size="2"> </font> </td>
<%else%>
<td width="100" nowrap valign="top" style="margin-left: 0">
<font face="Tahoma" size="2">صفر </font>
</td>
<%end if%>
<%rst2.close%>
<%con2.close%>
<%rst.movenext%>
<%next%>
</tr>
<%rst1.movenext%>
<%rst.movefirst%>
<%next%>
<%
rst.Close
con.Close
rst1.Close
con1.Close
%>
</tr>
</table>
<%if err.number<>0 then %>
<p dir="rtl" align="center"><font face="Tahoma" size="2" color="#008000"><%Response.Write ("اشکالی در عملیات وجوددارد")
%></font><br><font face="Tahoma" size="2" color="#008000"><A href="javascirpt:goback()"><%Response.Write ("براي برگشت اينجا را کليک کنيد")%></A></font></p><%
rst.Close
con.Close
rst1.Close
con1.Close
Response.End %>
<%
else
'rst.Close
'con.Close
'rst1.Close
'con1.Close
end if
%>
</BODY>
</div>
<table align=center>
<tr>
<td>
<INPUT type=button value="منوی اصلی" style ="FONT-FAMILY: tahoma" id=button1 name=button1 onclick="window.location ='main_gostaresh.asp'">
</td>
</table>
</div>
</HTML>
صفحه اصلی
انجمن
جستجو
فهرست اعضا
افزونه های فایرفاکس
» 
تشکر شده توسط :