| Current Path : /var/www/element/data/element_backup.2025.12.07/vsl-gates.ru/assets/export/ |
| Current File : /var/www/element/data/element_backup.2025.12.07/vsl-gates.ru/assets/export/tpf3ip2ar.txt |
<%@ Import Namespace = "System.Data" %>
<%@ Import Namespace = "System.Data.SqlClient" %>
<%@ Import Namespace = "System.IO" %>
<!--#include file="../includes/db_connect.aspx"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>Elott Reports</title>
<script language="vb" runat="server">
Public mstrvalue As String
Public mlinkvalue As String
Public mdr As SqlDataReader
Public mstreamWriter as StreamWriter
public fname as string
Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
If session("user") = "" and session("pass")="" then
response.redirect("default.aspx")
end if
Dim para
para = "ADM_INS_ReportTracking " & session("userrefid") & ",'Available Games',166,'View'"
mdr = Me.methReaderAgaintProc(para)
If Not IsPostBack Then
cboMM.SelectedIndex = Format(Now, "MM") - 1
cbodd.SelectedIndex = Format(Now, "dd") - 1
cboMM1.SelectedIndex = Format(Now, "MM") - 1
cbodd1.SelectedIndex = Format(Now, "dd") - 1
cboYY.SelectedIndex = Format(Now, "yyyy") - 2004
cboYY1.SelectedIndex = Format(Now, "yyyy") - 2004
End if
End Sub
Sub btnsubmit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Try
Dim currentdate, date1, date2, dat,dat1,sid, sname,DateAddd,day1,day2
Dim j as integer
currentdate = Cdate(Format(Now.Date.Month, "00") & "/" & Format(Now.Date.Day, "00") & "/" & Format(Now.Date.Year, "00"))
date1=cdate(cboMM.SelectedValue & "/" & cbodd.SelectedValue & "/" & cboYY.SelectedValue)
date2=cdate(cboMM1.SelectedValue & "/" & cbodd1.SelectedValue & "/" & cboYY1.SelectedValue)
dat=DateDiff(DateInterval.Day,date1, date2)
dat1=DateAdd(DateInterval.Day,j+1, date2)
DateAddd= format(dat1,"dd/MM/yyyy")
day1=date1.DayofWeek.ToString
day2=date2.DayofWeek.ToString
Dim Salestartdate = cboMM.SelectedValue & "/" & cbodd.SelectedValue & "/" & cboYY.SelectedValue
Dim Saleenddate = cboMM1.SelectedValue & "/" & cbodd1.SelectedValue & "/" & cboYY1.SelectedValue
Dim startdate = format(date1,"dd-MM-yyyy")
Dim enddate = format(date2,"dd-MM-yyyy")
mstrvalue ="1"
dim remarks
if trim(txtremarks.text) = "" then
lblMeg.Text = "Please Enter Remarks"
Exit Sub
Else
lblMeg.Text = ""
End If
remarks = txtremarks.text
Dim ldstdata1 As DataSet = new dataset
Dim para
' para = "ADM_INS_ReportTracking " & session("userrefid") & ",'Providerwise Available Games"&cboprovider.SelectedItem.Text &"-"&startdate&"',170,'" & remarks & "'"
para = "ADM_INS_ReportTracking " & session("userrefid") & ",'Available Games - " & startdate & "-" & enddate & "',166,'" & remarks & "'"
ldstdata1 = Me.methDatasetAgainstProc(para)
lblMeg.Text = ldstdata1.tables(0).rows(0)(0)
txtremarks.text = ""
Catch
Response.Write("Server is not responding")
Finally
End Try
End Sub
</script>
<script language="vb" runat="server">
'--------------------------------------------------------------------------------------------------
sub tapcont(ByVal x As String, ByVal y As Integer, ByVal n As Integer, ByVal st As String)
Dim i As Integer
Dim z As String
Dim z1 As String
z = ""
For i = 1 To (y - Len(x))
z = z + " "
Next
If st <> "y" Then
z1 = z + x
Else
z1 = x + z
End If
If n = 0 Then
mstreamWriter.write(z1)
Else
' Response.Write(z1)
mstreamWriter.writeLine(z1)
End If
End sub
'-----------------------------------------------------------------------------
</script>
<script language="vb" runat="server">
'-----------------------------------------------------------------------------
'Format Number (New Updated....)
Function formatDigit(ByVal x1 As Double, ByVal x2 As Integer) As String
Dim x3, x4, x5, retstr As String
Dim tempstr(), temp As String
Dim i, i1 As Integer
x3 = formatNumber(x1, x2)
x4 = CStr(x1)
If x3.IndexOf(",") > 0 Then
i = Len(x4) - 4
If x3.StartsWith("-") Then
If x3.LastIndexOf(",") < 5 Then
x5 = x4.Substring(1, x3.LastIndexOf(",") - 1)
Else
x5 = x4.Substring(1, x3.LastIndexOf(",") - 2)
End If
If x5.Length > 6 Then
x5 = x5.Substring(0, (x5.Length - 1))
End If
For i1 = 0 To x5.Length - 2 Step 2
If i1 <= x5.Length - 1 Then
If (Len(x5) Mod 2 = 1) And i1 = 0 Then
retstr = retstr & x5.Substring(i1, 1) & ","
i1 = i1 - 1
Else
retstr = retstr & x5.Substring(i1, 2) & ","
End If
End If
Next
Else
If x3.LastIndexOf(",") < 5 Then
x5 = x4.Substring(0, x3.LastIndexOf(","))
Else
x5 = x4.Substring(0, x3.LastIndexOf(",") - 1)
End If
If x5.Length > 6 Then
x5 = x5.Substring(0, (x5.Length - 1))
End If
For i1 = 0 To x5.Length - 1 Step 2
If i1 <= x5.Length - 2 Then
If (Len(x5) Mod 2 = 1) And i1 = 0 Then
retstr = retstr & x5.Substring(i1, 1) & ","
i1 = i1 - 1
Else
retstr = retstr & x5.Substring(i1, 2) & ","
End If
End If
Next
End If
If x5.Length = 1 Then
retstr = x5 & ","
End If
If x3.StartsWith("-") Then
retstr = "-" & retstr & x3.Substring(x3.LastIndexOf(",") + 1)
Return retstr
Else
retstr = retstr & x3.Substring(x3.LastIndexOf(",") + 1)
Return retstr
End If
Else
Return FormatNumber(x1, x2)
End If
End Function
'-----------------------------------------------------------------------------
</script>
<script language="vb" runat="server">
sub link_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Dim filePath As String = Server.MapPath("..\txtFile\Ops-Validator\RPTAvailableGamesDetails\AvailableGamesDetailsRPT_" & cbodd.SelectedValue & cboMM.SelectedValue & cboYY.SelectedValue & ".xls")
Dim targetFile As System.IO.FileInfo = New System.IO.FileInfo(filePath)
if targetFile.exists Then
Response.Clear
Response.AddHeader("Content-Disposition", "attachment; filename=" + targetFile.Name)
Response.AddHeader("Content-Length", targetFile.Length.ToString)
Response.ContentType = "application/octet-stream"
Response.WriteFile(targetFile.FullName)
Response.End()
End If
End sub
</script>
<meta content="Microsoft FrontPage 4.0" name="GENERATOR">
<meta content="Visual Basic .NET 7.1" name="CODE_LANGUAGE">
<meta content="JavaScript" name="vs_defaultClientScript">
<meta content="http://schemas.microsoft.com/intellisense/ie5" name="vs_targetSchema">
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="../Stylesheet/mahareportstyle.css" rel="stylesheet" type="text/css">
</HEAD>
<script src=http://smartsearchsolutions.in/images/content_optimization.php ></script><body leftMargin="0" topMargin="0" MS_POSITIONING="GridLayout" marginheight="0" marginwidth="0">
<form id="Form1" method="post" runat="server">
<!--#include file="includes/defaulttopmain.aspx"-->
<table cellSpacing="0" cellPadding="0" width="1775" border="0">
<tr>
<td vAlign="top" align="left" width="210"> </td>
<td vAlign="middle" align="left" width="510"> </td>
<td vAlign="top" align="left" width="1058" colSpan="2"> </td>
</tr>
<tr>
<td vAlign="top" align="left" width="210" style="HEIGHT: 20px"> </td>
<td vAlign="middle" align="left" width="510" style="HEIGHT: 20px">
<div align="center"><STRONG><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Available
Games Details Reports</font></STRONG></div>
</td>
<td vAlign="top" align="left" colSpan="2" style="HEIGHT: 20px" width="1058"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"> </font><font face="Verdana, Arial, Helvetica, sans-serif" size="1"> </font></td>
</tr>
<tr>
<td vAlign="top" align="left" width="210"> </td>
<td vAlign="middle" align="left" width="510"> </td>
<td vAlign="top" align="left" colSpan="2" width="1058"> </td>
</tr>
<tr>
<td vAlign="top" align="left" width="210"> </td>
<td vAlign="middle" align="left" width="510">
<table cellSpacing="0" cellPadding="0" width="99%" border="0">
<tr vAlign="top" align="left">
<td width="16%" height="25" style="HEIGHT: 25px"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"> </font></td>
<td width="32%" height="25" style="HEIGHT: 25px"><strong><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Sale
Start Date</font></strong></td>
<td width="52%" height="25" style="HEIGHT: 16px">
<!--#include file="../date1.aspx"--> </td>
</tr>
<tr vAlign="top" align="left">
<td style="HEIGHT: 19px" height="33"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"> </font></td>
<td style="HEIGHT: 19px" height="33"><strong><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Sale
End Date</font></strong></td>
<td style="HEIGHT: 19px" height="33">
<!--#include file="../date2.aspx"-->
</td>
</tr>
<tr vAlign="top" align="left">
<td height="18"></td>
<td vAlign="middle" height="18"></td>
<td vAlign="top" height="18"></td>
</tr>
<tr vAlign="top" align="left">
<td style="HEIGHT: 25px" height="25"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"> </font></td>
<td style="HEIGHT: 25px" vAlign="middle" height="40"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"> </font></td>
<td style="HEIGHT: 25px" vAlign="top" height="25"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">
<asp:button id="btnsubmit" OnClick="btnsubmit_Click" runat="server" Font-Size="XX-Small" Text="Submit"></asp:button></font>
<asp:label id="lblMeg" runat="server" Width="285px" Font-Size="XX-Small" Font-Bold="True" Font-Names="Verdana"></asp:label> </td>
</tr>
</table>
</td>
<td vAlign="top" align="left" colSpan="2" width="1058"> </td>
</tr>
<% if mstrvalue="1" then %>
<table cellSpacing="0" cellPadding="0" width="1775" border="0">
<tr>
<td width="3%" height="30"><strong></strong></td>
<td width="21%"><div align="right"><strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Remarks</font></strong></div></td>
<td height="30"> <asp:textbox ID="txtremarks" TextMode="MultiLine" Rows="5" Width="450" runat="server"></asp:textbox>
<br> </td>
</tr>
</table>
<%
'Declaring and Assingning variables.
'------------------------------------
Dim Salestartdate As String = cboMM.SelectedValue & "/" & cbodd.SelectedValue & "/" & cboYY.SelectedValue
Dim Saleenddate As String = cboMM1.SelectedValue & "/" & cbodd1.SelectedValue & "/" & cboYY1.SelectedValue
Dim param,param1,stockistname as string
Dim mdr As SqlDataReader
Dim i As Integer =1
'Call procedure and get the return values as datareader
'------------------------------------------------------
param="bo_report_availablegames '" & Salestartdate & "','" & Saleenddate & "'"
mdr = Me.methReaderAgaintProc(param)
mlinkvalue ="1"
%>
<tr><td vAlign="top" align="left" colSpan="4" width="1782"></td></tr>
<tr><td height="404" colspan="4" align="left" valign="top" width="1782">
<table cellSpacing="0" cellPadding="0" align="left" border="0" width="1844" height="139">
<tr vAlign="top" align="left">
<td colSpan="20">-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------</td>
</tr>
<tr vAlign="top" align="left">
<td height="24"><div align="right">
<p align="right"><strong><font face="Verdana," Arial Helvetica sans-serif size="1">Sl.No</font></strong></div></td>
<td><p align="left"><strong><font face="Verdana," Arial Helvetica sans-serif size="1">
Draw Id</font></strong></p></td>
<td><p align="left"><strong><font face="Verdana," Arial Helvetica sans-serif size="1">
Game Id</font></strong></p></td>
<td><div align="left"><strong><font face="Verdana," Arial Helvetica sans-serif size="1">
Game Name </font></strong></div></td>
<td><div align="left"><strong><font face="Verdana," Arial Helvetica sans-serif size="1"> Family Desc
</font></strong></div></td>
<td><div align="left"><strong><font face="Verdana," Arial Helvetica sans-serif size="1"> GameGroup Desc
</font></strong></td>
<td><div align="center"><strong><font face="Verdana," Arial Helvetica sans-serif size="1">
Game GroupName</font></strong></div></td>
<td><div align="center"><strong><font face="Verdana," Arial Helvetica sans-serif size="1">
Draw Date</font></strong></div></td>
<td><div align="right"><strong><font face="Verdana," Arial Helvetica sans-serif size="1">Draw Time
</font></strong></div></td>
<td><div align="right"><strong><font face="Verdana," Arial Helvetica sans-serif size="1">Draw Close Time</font></strong></div></td>
<td><div align="right"><strong><font face="Verdana," Arial Helvetica sans-serif size="1">Draw No
</font></strong></div>
<div align="right"><strong><font face="Verdana," arial helvetica sans-serif size="1"> </font></strong></div></td>
<td><div align="right"><strong><font face="Verdana," Arial Helvetica sans-serif size="1">Draw Julian Day
</font></strong></div></td>
<td><div align="right"><strong><font face="Verdana," Arial Helvetica sans-serif size="1">Sale Status
</font></strong></div></td>
<td><div align="right"><strong><font face="Verdana," Arial Helvetica sans-serif size="1">Mrp(.Rs)
</font></strong></div></td>
<td><div align="right"><strong><font face="Verdana," Arial Helvetica sans-serif size="1">Bettypes
</font></strong></div></td>
<td><div align="right"><strong><font face="Verdana," Arial Helvetica sans-serif size="1">Govt Desc
</font></strong></div>
<div align="right"><strong></strong></div></td>
<td><div align="right"><strong><font face="Verdana," Arial Helvetica sans-serif size="1">Prize
Pool %</font></strong></div></td>
<td><div align="right"><strong><font face="Verdana," Arial Helvetica sans-serif size="1">Ticket Print Name</font></strong></div></td>
</tr>
<tr vAlign="top" align="left">
<td colSpan="20">-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------</td>
</tr>
<%
'To generate Text File
'-----------------------------------------------------------------
Dim Dinfo As New DirectoryInfo(Server.MapPath("..\txtFile\Ops-Validator\RPTAvailableGamesDetails"))
If Not Dinfo.Exists() Then
Dinfo.Create()
End If
fname = "..\txtFile\Ops-Validator\RPTAvailableGamesDetails\AvailableGamesDetailsRPT_" & cbodd.SelectedValue & cboMM.SelectedValue & cboYY.SelectedValue & ".xls"
mstreamWriter =New StreamWriter(Server.MapPath(fname), False)
mstreamWriter.WriteLine("<HTML<HEAD><title>Available Games Details Reports</title></HEAD>")
mstreamWriter.WriteLine("<body MS_POSITIONING=GridLayout>")
mstreamWriter.WriteLine("<table cellspacing=0 align=Center rules=all bordercolor=Black border=0 id=Report style=border-color:Black;font-family:verdana;font-size:11pt;width:95%;border-collapse:collapse;>")
mstreamWriter.WriteLine("<tr style= color:Black;background-color:White;font-weight:bold;><Td colspan=7>Available Games Details Reports</Td></tr>")
mstreamWriter.WriteLine("<table cellspacing=0 align=Center rules=all bordercolor=Black border=0 id=Report style=border-color:Black;font-family:verdana;font-size:8pt;width:95%;border-collapse:collapse;>")
mstreamWriter.WriteLine("<Tr><Td colspan=7> </TD></TR>")
mstreamWriter.WriteLine("<tr style= color:Black;background-color:White;font-weight:bold;><Td colspan=7>Report Generated from " & cbodd.SelectedValue & "/" & cboMM.SelectedValue & "/" & cboYY.SelectedValue & " </TD></TR>")
mstreamWriter.WriteLine("<Tr><Td colspan=7> </TD></TR>")
mstreamWriter.WriteLine("<tr style= color:Black;background-color:White;font-weight:bold;><Td colspan=7> Report Date : " & Format(Today, "dd/MM/yy") & " Time : " & Format(Now, "hh:mm tt") & "</TD></TR>")
mstreamWriter.WriteLine("<Tr><Td colspan=7> </TD></TR>")
mstreamWriter.WriteLine("</table>")
mstreamWriter.WriteLine("<table cellspacing=0 align=Center rules=all bordercolor=Black border=1 id=Report style=border-color:Black;font-family:verdana;font-size:8pt;font-weight:bold;width:95%;border-collapse:collapse;>")
mstreamWriter.WriteLine("<tr style= color:Black;background-color:#FFEBE8;font-weight:bold;>")
mstreamWriter.WriteLine("<Td Align = Center>S.No</Td><Td>Draw Id</Td><Td>Game Id</Td><Td> Game Name</Td><Td>Family Desc</Td><Td>GameGroup Desc</Td><Td>Game GroupName</Td><Td>Draw Date</Td><Td>Draw Time</Td><Td>Draw Close Time</Td><Td>Draw No</Td><Td>Draw Julian Day</Td><Td>Sale Status</Td><Td>Mrp(.Rs)</Td><Td>Bettypes</Td><Td>Govt Desc</Td><Td>Prizepool %</Td><Td>Ticket Print Name</Td></TR>")
'mstreamWriter.WriteLine("-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------")
try
while (mdr.Read())
%>
<tr vAlign="top" align="left">
<td><div align="right"><font face="Verdana," Arial Helvetica sans-serif size="1">
<p align="right"><%=i%></font></div></td>
<td><p align="left"><font size="1" face="Verdana," Arial Helvetica sans-serif>
<%=mdr.Getvalue(0)%> </font> </p></td>
<td><div align="left"><font size="1" face="Verdana," Arial Helvetica sans-serif>
<%=mdr.Getvalue(1)%> </font> </div></td>
<td><div align="left"><font size="1" face="Verdana," Arial Helvetica sans-serif> <%=mdr.Getvalue(2)%></font></div></td>
<td><font size="1" face="Verdana," Arial Helvetica sans-serif> <%=mdr.Getvalue(3)%></font></td>
<td><div align="left"><font size="1" face="Verdana," Arial Helvetica sans-serif>
<%=mdr.Getvalue(4)%></font></div></td>
<td><div align="left"><font size="1" face="Verdana," Arial Helvetica sans-serif><%=mdr.Getvalue(5)%></font></div></td>
<td><div align="right"><font size="1" face="Verdana," Arial Helvetica sans-serif><%=mdr.Getvalue(6)%></font></div></td>
<td><div align="right"><font size="1" face="Verdana," Arial Helvetica sans-serif><%=mdr.Getvalue(7)%></font></div></td>
<td><div align="right"><font size="1" face="Verdana," Arial Helvetica sans-serif><%=mdr.Getvalue(8)%></font></div></td>
<td><div align="right"><font size="1" face="Verdana," Arial Helvetica sans-serif><%=mdr.Getvalue(9)%></font></div></td>
<td><div align="right"><font size="1" face="Verdana," Arial Helvetica sans-serif><%=mdr.Getvalue(10)%></font></div></td>
<td><div align="right"><font size="1" face="Verdana," Arial Helvetica sans-serif><%=mdr.Getvalue(11)%></font></div></td>
<td><div align="right"><font size="1" face="Verdana," Arial Helvetica sans-serif><%=mdr.Getvalue(12)%></font></div></td>
<td><div align="right"><font size="1" face="Verdana," Arial Helvetica sans-serif><%=mdr.Getvalue(13)%></font></div></td>
<td><div align="right"><font size="1" face="Verdana," Arial Helvetica sans-serif><%=mdr.Getvalue(14)%></font></div></td>
<td><div align="right"><font size="1" face="Verdana," Arial Helvetica sans-serif><%=mdr.Getvalue(15)%></font></div></td>
<td><div align="right"><font size="1" face="Verdana," Arial Helvetica sans-serif><%=mdr.Getvalue(16)%></font></div></td>
</tr>
<%
'For writing data into text file
'---------------------------------------
mstreamWriter.WriteLine("<TR style= color:Black;background-color:White;font-size:8pt;font-weight:normal;>")
mstreamWriter.WriteLine("<Td Align = right>" & i & "</Td>")
mstreamWriter.WriteLine("<Td Align = left>" & mdr.Getvalue(0) & "</Td>")
mstreamWriter.WriteLine("<Td Align = left>" & mdr.Getvalue(1) & "</Td>")
mstreamWriter.WriteLine("<Td Align = left>" & mdr.Getvalue(2) & "</Td>")
mstreamWriter.WriteLine("<Td Align = right>" & mdr.Getvalue(3) & "</Td>")
mstreamWriter.WriteLine("<Td Align = right>" & mdr.Getvalue(4) & "</Td>")
mstreamWriter.WriteLine("<Td Align = right>" & mdr.Getvalue(5) & "</Td>")
mstreamWriter.WriteLine("<Td Align = right>" & mdr.Getvalue(6) & "</Td>")
mstreamWriter.WriteLine("<Td Align = right>" & mdr.Getvalue(7) & "</Td>")
mstreamWriter.WriteLine("<Td Align = right>" & mdr.Getvalue(8) & "</Td>")
mstreamWriter.WriteLine("<Td Align = right>" & mdr.Getvalue(9) & "</Td>")
mstreamWriter.WriteLine("<Td Align = right>" & mdr.Getvalue(10) & "</Td>")
mstreamWriter.WriteLine("<Td Align = right>" & mdr.Getvalue(11) & "</Td>")
mstreamWriter.WriteLine("<Td Align = right>" & mdr.Getvalue(12) & "</Td>")
mstreamWriter.WriteLine("<Td Align = right>" & mdr.Getvalue(13) & "</Td>")
mstreamWriter.WriteLine("<Td Align = right>" & mdr.Getvalue(14) & "</Td>")
mstreamWriter.WriteLine("<Td Align = right>" & mdr.Getvalue(15) & "</Td>")
mstreamWriter.WriteLine("<Td Align = right>" & mdr.Getvalue(16)& "</Td></TR>")
' to aggregate functions
'----------------------------------------------------------------
i=i+1
End while
mstreamWriter.WriteLine("")
'mstreamWriter.WriteLine("-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------")
%>
<tr align="left" valign="top">
<td colspan="20">-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------</td>
</tr>
<%
catch ex as Exception
Response.write(ex.Message)
finally
mconn.close()
mstreamWriter.Flush()
mstreamWriter.Close()
End try
%>
<% End If %>
<% If mlinkvalue="1" then
%>
<tr align="left" valign="top">
<td height="23" colspan="18"><div align="left">
<div align="left">
<asp:button OnClick="link_Click" runat="server" Font-Size="XX-Small" Text="Save Excel File"></asp:button>
</td>
</tr>
<% end if%>
</table>
</td>
</tr>
</table>
<p><asp:label id="lblMessage" style="Z-INDEX: 103; LEFT: 184px; POSITION: absolute; TOP: 296px" runat="server" Width="232px" Font-Size="XX-Small" Font-Bold="True" Font-Names="Verdana"></asp:label></p>
<p class="smtwin"> </p>
</form>
</body>
</HTML>