HI,
I have problem with my asp. It always give me blank page when run. the rest ASP page is ok only this one...
Here I attach the code :
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim strUserID
strUserID=Request.Form("UserID")
if strUserID <> "" then
%>
<%
Dim rstraining
Dim rstraining_numRows
Set rstraining = Server.CreateObject("ADODB.Recordset")
rstraining.ActiveConnection = MM_sqlconn_STRING
rstraining.Source = "select * from dbo.TrainingForm WHERE UserID LIKE '%" & strUserID & "%'"
rstraining.CursorType = 0
rstraining.CursorLocation = 2
rstraining.LockType = 1
rstraining.Open()
rstraining_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = -1
Repeat1__index = 0
rstraining_numRows = rstraining_numRows + Repeat1__numRows
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Approval /title>
<style type="text/css">
<!--
.style1 {
font-family: Verdana;
font-size: 10px;
font-weight: bold;
}
-->
</style>
</head>
<body>
<p><img src="186kbr.gif" width="165" height="40"></p>
<form name="form1" method="get" action="approvalact.asp">
<table width="80%" border="1" cellpadding="1">
<tr>
<td class="style1">Check Here </td>
<td class="style1">Full Name </td>
<td class="style1">Job Title </td>
<td class="style1">Line Manager </td>
<td class="style1">Course Name </td>
<td class="style1">Start Date </td>
<td class="style1">End Date </td>
<td class="style1">Total Hour </td>
<td class="style1">Currency</td>
<td class="style1">Cost</td>
<td class="style1">Provider</td>
<td class="style1">Location</td>
</tr>
<%
While ((Repeat1__numRows <> 0) AND (NOT rstraining.EOF))
%>
<tr>
<td class="style1">
<input type="checkbox" name="update_training" id="update_training" value="<%=(rstraining.fields.item("SysTrainingID") .Value)%>" >
</td>
<td class="style1"><%=rstraining("FullName")%></td>
<td class="style1"><%=rstraining("JobTitle")%></td>
<td class="style1"><%=rstraining("LineManager")%></td>
<td class="style1"><%=rstraining("CourseName")%></td>
<td class="style1"><%=rstraining("StartDate")%></td>
<td class="style1"><%=rstraining("EndDate")%></td>
<td class="style1"><%=rstraining("TotalTrainingHour")% ></td>
<td class="style1"><%=rstraining("Currency")%></td>
<td class="style1"><%=rstraining("Cost")%></td>
<td class="style1"><%=rstraining("TrainingProvider")%> </td>
<td class="style1"><%=rstraining("Location")%></td>
</tr>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
rstraining.MoveNext()
Wend
%>
</table>
<p> </p>
<table width="60%" border="1">
<tr>
<td width="25%" class="style1">Approval</td>
<td width="75%"><select name="Approval" size="1" class="style1" id="Approval">
<option value="Approve">Approve</option>
<option value="Reject">Reject</option>
</select></td>
</tr>
</table>
<p> </p>
<span class="style1">
<input name="Submit" type="submit" class="style1" value="Submit">
</span></p>
<p> </p>
<p> </p>
</form>
</body>
</html>
<%
end if
rstraining.Close()
Set rstraining = Nothing
%>
i dont know what is wrong with that...:(. I already try so many ways but still cannot, always give me the blank page
Any suggestions will be helpfull
Regards,
Avryl
ASP give blank page after run
