D
dave
Hi guys
I display one page in popup window...that fetches some data from sql and
perfom some calculation (tht approx 10 secs) and display result....
I am trying to display "Please wait ..."message while its performing
calculation...
I'm using the below code...that i have got from following link
http://aspfaq.com/show.asp?id=2498
but somehow it doesnt work and displays nothing....it display only for a
second before the actual result is displayed...
Below is my code snippet:
<%@LANGUAGE="VBSCRIPT"%>
<!-- #include file="common/constants.asp"--> 'tht containts sql
connection string
<!-- #include file="common/database.asp"--> ' contains one class to
perform to database and record set operation
<% Response.Buffer = True %>
<html>
<head>
<title>My Style - Plan Matrix</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link rel="stylesheet" href="common/m8extranet.css" type="text/css">
</head>
<style>
..boxText {font-family:Arial; font-size:9pt; color:222222; font-weight:400;}
</style>
<body>
<script>
<!--
if (document.all)
{
document.write("<span id=wxx>Please");
document.write(" wait...</span>");
}
//-->
</script>
<% Response.Flush() %>
<%
sql = "Select * From Phoneprice Order by phprice"
set rs = database.executequery(sql)
sql = "Select * From Plancommi WHERE ptype='My Style' Order By planid"
set rs1 = database.executequery(sql)
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><table width="100%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td width="10%" class="header"><div
align="right"><b>Plan</b></div></td>
<td width="9%" class="header"><b> Matrix</b></td>
<td width="9%" bgcolor="#CFF2FE" class="topMenubig"> <div
align="center"><strong>My
Style 16</strong></div></td>
<td width="9%" bgcolor="#AEAEFF" class="topMenubig"> <div
align="center"><strong>My
Style 20</strong></div></td>
<td width="9%" bgcolor="#FFD9D7" class="topMenubig"> <div
align="center"><strong>My
Style 30</strong></div></td>
<td width="9%" bgcolor="#DBB7FF" class="topMenubig"> <div
align="center"><strong>My
Style 40</strong></div></td>
<td width="9%" bgcolor="#FAE2AD" class="topMenubig"> <div
align="center"><strong>My
Style 50</strong></div></td>
<td width="9%" bgcolor="#FECBFD" class="topMenubig"> <div
align="center"><strong>My
Style 70</strong></div></td>
<td width="9%" bgcolor="#BBFFBB" class="topMenubig"> <div
align="center"><strong>My
Style 90</strong></div></td>
<td width="9%" bgcolor="#BFDFFF" class="topMenubig"> <div
align="center"><strong>My
Style 150</strong></div></td>
<td width="9%" bgcolor="#D3D3A9" class="topMenubig"> <div
align="center"><strong>My
Style 200</strong></div></td>
</tr>
<tr><td colspan="12"> </td></tr>
<%
while not rs.eof
Response.write "<tr>"
Response.write "<td height=24 bgcolor=#DFDFDF align=center
class=boxText>"&rs("phname")&"</td>"
Response.write "<td bgcolor=#DFDFDF align=center
class=boxText>"&rs("phmodel")&"</td>"
'Response.write "<td bgcolor=#DFDFDF align=center
class=boxText>"&FormatCurrency(rs("phprice"),2)&"</td>"
rs1.movefirst
cnt=1
while not rs1.eof
mystr = "tx_mar"&cnt
tmpSql = "Select * From IMEIBonus WHERE Phid="&rs("phid")&" AND
PlanId="&rs1("planid")
'Response.write tmpSql
'response.End()
set rs_imei = database.executequery(tmpSql)
If Not rs_imei.eof then
IMEIBonus = rs_imei("Bonus")
else
IMEIBonus = 0
End If
myno = (rs1("commission") + IMEIBonus) -
(rs("phprice")+Request.form(cstr(mystr)))
If myno >= 0 Then
Response.write "<td align=center bgcolor=#"&rs1("bgcol")&"
class=boxText>Free</td>"
Else
myno = Abs(myno)
Response.write "<td align=center bgcolor=#"&rs1("bgcol")&"
class=boxText>"&FormatCurrency(myno,0)&"</td>"
End If
set rs_imei = Nothing
rs1.movenext
cnt = cnt + 1
wend
rs.movenext
wend
%>
</table></td>
</tr>
</table>
<%
set rs= Nothing
set rs1 = Nothing
%>
<script>
<!--
if (document.all)
{
document.all("wxx").style.display = 'none';
}
//-->
</script>
</body>
</html>
can any one help me??
Thanx in advance
dave
I display one page in popup window...that fetches some data from sql and
perfom some calculation (tht approx 10 secs) and display result....
I am trying to display "Please wait ..."message while its performing
calculation...
I'm using the below code...that i have got from following link
http://aspfaq.com/show.asp?id=2498
but somehow it doesnt work and displays nothing....it display only for a
second before the actual result is displayed...
Below is my code snippet:
<%@LANGUAGE="VBSCRIPT"%>
<!-- #include file="common/constants.asp"--> 'tht containts sql
connection string
<!-- #include file="common/database.asp"--> ' contains one class to
perform to database and record set operation
<% Response.Buffer = True %>
<html>
<head>
<title>My Style - Plan Matrix</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link rel="stylesheet" href="common/m8extranet.css" type="text/css">
</head>
<style>
..boxText {font-family:Arial; font-size:9pt; color:222222; font-weight:400;}
</style>
<body>
<script>
<!--
if (document.all)
{
document.write("<span id=wxx>Please");
document.write(" wait...</span>");
}
//-->
</script>
<% Response.Flush() %>
<%
sql = "Select * From Phoneprice Order by phprice"
set rs = database.executequery(sql)
sql = "Select * From Plancommi WHERE ptype='My Style' Order By planid"
set rs1 = database.executequery(sql)
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><table width="100%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td width="10%" class="header"><div
align="right"><b>Plan</b></div></td>
<td width="9%" class="header"><b> Matrix</b></td>
<td width="9%" bgcolor="#CFF2FE" class="topMenubig"> <div
align="center"><strong>My
Style 16</strong></div></td>
<td width="9%" bgcolor="#AEAEFF" class="topMenubig"> <div
align="center"><strong>My
Style 20</strong></div></td>
<td width="9%" bgcolor="#FFD9D7" class="topMenubig"> <div
align="center"><strong>My
Style 30</strong></div></td>
<td width="9%" bgcolor="#DBB7FF" class="topMenubig"> <div
align="center"><strong>My
Style 40</strong></div></td>
<td width="9%" bgcolor="#FAE2AD" class="topMenubig"> <div
align="center"><strong>My
Style 50</strong></div></td>
<td width="9%" bgcolor="#FECBFD" class="topMenubig"> <div
align="center"><strong>My
Style 70</strong></div></td>
<td width="9%" bgcolor="#BBFFBB" class="topMenubig"> <div
align="center"><strong>My
Style 90</strong></div></td>
<td width="9%" bgcolor="#BFDFFF" class="topMenubig"> <div
align="center"><strong>My
Style 150</strong></div></td>
<td width="9%" bgcolor="#D3D3A9" class="topMenubig"> <div
align="center"><strong>My
Style 200</strong></div></td>
</tr>
<tr><td colspan="12"> </td></tr>
<%
while not rs.eof
Response.write "<tr>"
Response.write "<td height=24 bgcolor=#DFDFDF align=center
class=boxText>"&rs("phname")&"</td>"
Response.write "<td bgcolor=#DFDFDF align=center
class=boxText>"&rs("phmodel")&"</td>"
'Response.write "<td bgcolor=#DFDFDF align=center
class=boxText>"&FormatCurrency(rs("phprice"),2)&"</td>"
rs1.movefirst
cnt=1
while not rs1.eof
mystr = "tx_mar"&cnt
tmpSql = "Select * From IMEIBonus WHERE Phid="&rs("phid")&" AND
PlanId="&rs1("planid")
'Response.write tmpSql
'response.End()
set rs_imei = database.executequery(tmpSql)
If Not rs_imei.eof then
IMEIBonus = rs_imei("Bonus")
else
IMEIBonus = 0
End If
myno = (rs1("commission") + IMEIBonus) -
(rs("phprice")+Request.form(cstr(mystr)))
If myno >= 0 Then
Response.write "<td align=center bgcolor=#"&rs1("bgcol")&"
class=boxText>Free</td>"
Else
myno = Abs(myno)
Response.write "<td align=center bgcolor=#"&rs1("bgcol")&"
class=boxText>"&FormatCurrency(myno,0)&"</td>"
End If
set rs_imei = Nothing
rs1.movenext
cnt = cnt + 1
wend
rs.movenext
wend
%>
</table></td>
</tr>
</table>
<%
set rs= Nothing
set rs1 = Nothing
%>
<script>
<!--
if (document.all)
{
document.all("wxx").style.display = 'none';
}
//-->
</script>
</body>
</html>
can any one help me??
Thanx in advance
dave