<%
set RS = server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT qeyCourseDetail.*, tblCourse.* from qeyCourseDetail INNER JOIN tblCourse on tblCourse.intID = qeyCourseDetail.intCourse where intState = " & intState & " order by qeyCourseDetail.dteStart"
'Response.Write strSQL
'Response.End()
set RS = my_conn.Execute(strSQL)
Do While (Not RS.EOF) %>
| Name: | <%=RS("strCourse")%> |
| Date: | <%=formatDate("%l, %F %d %Y",RS("dteStart"))%> |
| Address: | <%=RS("strAddress1")%>
<%=RS("strAddress2")%>, <%=RS("strCity")%>, <%=RS("strShort")%>, <%=RS("strPostCode")%> |
| Time: | <%=RS("strTime")%> |
| Cost: | <%=RS("strCost")%> |
| |
| What included:
|
| <%=modifyReturn(RS("strInclude")&"")%> |
|
|
| Course Outline: |
| <%=modifyReturn(RS("strOutLine")&"")%> |
" onMouseOver="MM_swapImage('regibuton1','','registerbutton2.jpg',1)" onMouseOut="MM_swapImgRestore()"> |
| |
<%
RS.MoveNext
loop
RS.Close()
set RS = nothing
%>