coreybryant
asked on
No value given for one or more required parameters.
Here we go :) - my programmer is gone so I am stuck. I am getting this error:
No value given for one or more required parameters.
/classregistration/include /Query.asp , line 28
<%
class Query
Private sqlString, comm, rs
Private Sub Class_Initialize()
Set comm = Server.CreateObject("ADODB .Command")
End Sub
Private Sub Class_Terminate()
set rs = nothing
set comm = nothing
End Sub
Public Property Let SQL(newValue)
sqlString = newValue
End Property
public function Execute()
Dim DBMan
Set DBMan = new DBManager
If DBMan.OpenDataBaseConnecti on() Then
comm.ActiveConnection = DBMan.DB_Connection
comm.CommandType = adCmdText
comm.CommandText = sqlString
comm.CommandTimeout = 0
Set rs = Server.CreateObject("ADODB .Recordset ")
rs.CursorLocation = adUseClient
rs.Open comm
End If
Set DBMan = Nothing
end function
Public Property Get Result()
set Result = rs
End Property
end class
Function ExecuteSQL(SQL)
dim qry
Set qry = new Query
qry.SQL = SQL
qry.Execute
set ExecuteSQL = qry.Result
End Function
Function ExistsSQL(SQL)
dim rs, qry
Set qry = new Query
qry.SQL = SQL
qry.Execute
ExistsSQL = not qry.Result.eof
End Function
%>
Line 28 is:
rs.Open comm
Now I am sure that it might not be pulling some of the information properly but I have no idea where to start / look.
Thanks!
-Corey
No value given for one or more required parameters.
/classregistration/include
<%
class Query
Private sqlString, comm, rs
Private Sub Class_Initialize()
Set comm = Server.CreateObject("ADODB
End Sub
Private Sub Class_Terminate()
set rs = nothing
set comm = nothing
End Sub
Public Property Let SQL(newValue)
sqlString = newValue
End Property
public function Execute()
Dim DBMan
Set DBMan = new DBManager
If DBMan.OpenDataBaseConnecti
comm.ActiveConnection = DBMan.DB_Connection
comm.CommandType = adCmdText
comm.CommandText = sqlString
comm.CommandTimeout = 0
Set rs = Server.CreateObject("ADODB
rs.CursorLocation = adUseClient
rs.Open comm
End If
Set DBMan = Nothing
end function
Public Property Get Result()
set Result = rs
End Property
end class
Function ExecuteSQL(SQL)
dim qry
Set qry = new Query
qry.SQL = SQL
qry.Execute
set ExecuteSQL = qry.Result
End Function
Function ExistsSQL(SQL)
dim rs, qry
Set qry = new Query
qry.SQL = SQL
qry.Execute
ExistsSQL = not qry.Result.eof
End Function
%>
Line 28 is:
rs.Open comm
Now I am sure that it might not be pulling some of the information properly but I have no idea where to start / look.
Thanks!
-Corey
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
Here is the previous page:
<!-- #include file="include/header.asp" -->
<%
CheckPermissionCMS(SITEOWN ER)
dim op, sid, lid, id, rs, locationName, message, errmessage, all, monthid, sessid
op = Request.QueryString("op")
all = Request.QueryString("all")
id = Request.QueryString("id") 'member ID
sid = Request.QueryString("sid") 'session ID
lid = Request.QueryString("lid") 'location ID
monthid= Request.QueryString("month id") 'month
sessid= Request.QueryString("sessi onid") 'month
If op="delmonth" Then
if not isNumeric(monthid) or monthid ="" then
rw "Script error ... no month selected"
re
end if
DeleteMonth monthid ,lid ' month and location
monthid=month(now)
op=""
End if
If op="delsess" Then
if not isNumeric(sessid) or sessid ="" then
rw "Script error ... no session selected"
re
end if
DeleteSession sessid ' session
' monthid=month(now)
op=""
End if
if not isNumeric(monthid) or monthid ="" then
monthid=month(now)
end if
if not isNumeric(lid) or lid="" then
lid = GetFirstLocationID
if lid = 0 then
rw "Please create a location first"
re
end if
end if
locationName = GetLocationDetail(lid).Loc ationName
if op = "reg" then
if not isNumeric(id) or id = "" then
rw "Invalid Member ID:" & id
re
end if
if not isNumeric(sid) or sid="" then
rw "Invalid session ID"
re
end if
RegisterSession sid, id
rw "email: free slot for first waiting member"
SendFreeSlotMessage id, sid
end if
'if op = "add" then
'res = DeactivateSession(sid)
'if res = errNoErrors then
'message = "Session was successfully deactivated."
'else
'errmessage = msgUnknownErr
'end if
'end if
'If all=0 Then
' set rs = GetSessionList(lid)
'else
' set rs = GetSessionListAll(lid)
'End if
set rs = GetMonthSessionList(lid,mo nthid)
%>
<br>
<script language="JavaScript">
function confirm_session_delete(ses sionid, name){
if (confirm ("Do you really want to delete the session " + name)){
document.location = "sessionlist.asp?op=delses s&sessionI D=" + sessionid + "&monthid=<%=monthid%>";
//document.frmSession.subm it();
}
return false;
}
function confirm_month_delete(){
if (confirm ("Do you really want to delete the sessions for " + document.frmSession.monthi d.options[ document.f rmSession. monthid.se lectedInde x].text)){
location = "sessionlist.asp?lid=<%=li d%>&op=del month&mont hID=" + document.frmSession.monthi d.options[ document.f rmSession. monthid.se lectedInde x].value;
}
return false;
}
</script>
<form name="frmSession" action="sessionlist.asp" method="get">
<input type="hidden" name="id" value="<%=id%>">
<input type="hidden" name="lid" value="<%=lid%>">
<input type="hidden" name="op" value="<%=op%>">
<table class="formTable" cellpadding="5" cellspacing="0" border="0" align="center" width='80%'>
<tr><td class="formTitle" colspan="2">Booking in <%=locationName%></td></tr >
<%if message <> "" then%>
<tr><td class="message" colspan="2"><%=message%></ td></tr>
<%elseif errmessage <> "" then%>
<tr><td class="errmessage" colspan="2"><%=errmessage% ></td></tr >
<%end if%>
<tr><td align="left" colspan="2">Show Booking for:</td></tr>
<tr>
<tr><td align="left"><select name="monthid"><%GenerateM onthCombo lid, monthid%></select> <i nput type="submit" name="month" value="Show">
<input type="submit" name="deletepast" value="Delete old Sessions" onclick="return confirm_month_delete();">
</td><td align="right"><a href="session.asp?op=add&l id=<%=lid% >">Add session</a> in < select name="locationID" onChange="javascript:docum ent.locati on='sessio nlist.asp? lid=' + document.frmSession.locati onID.value ;"><%Gener ateLocatio nCombo(lid )%></selec t></td></t r>
<tr>
<td width="100%" colspan="2">
<table cellspacing="0" cellpadding="5" width="100%" border="0">
<tr class="tableHeader">
<td width="20%">Date</td>
<td width="8%">Start</td>
<td width="8%">End</td>
<td width="24%">Session Name</td>
<td width="10%">Status</td>
<td width="5%" align="right">Registered</ td>
<td width="10%" align="right">Confirmed</t d>
<td width="15%" align="right">Available</t d>
</tr>
<%
dim i, oddRow, firstWaitID, firstWaitName, freeSlots, firstMember, regslots, confslots
i = 0
while not rs.EOF
i = 1 - i
if i = 0 then
oddrow = "class=""highlight"""
else
oddrow = ""
end if
confslots = GetMemberNumberByStatus(rs ("SessionI D"),"C")
regslots = GetMemberNumberByStatus(rs ("SessionI D"),"R") + confslots
freeSlots = rs("slot") - confslots'Session_GetFreeS lots(rs("S essionID") ) - confslots
%>
<tr <%=oddrow%>>
<td><%=FormatDateTime(rs(" SessionDat e"),vbLong Date)%></t d>
<td><%=rs("StartHour") & ":" & rs("StartMin") & " " & rs("StartSuffix")%></td>
<td><%=rs("EndHour") & ":" & rs("EndMin") & " " & rs("EndSuffix")%></td>
<td><a href="session.asp?sid=<%=r s("Session ID")%>" title="Edit session"><%=Encode(rs("Ses sionName") )%></a></t d>
<td><%=rs("StatusName")%>& nbsp;<inpu t class="redbutton" type="button" name="action" value="Delete" onClick="confirm_session_d elete(<%=r s("session ID")%>,'<% =rs("sessi onname")%> ');"></td>
<td align="right"><%=regslots% ></td>
<td align="right"><%=iif(rs("M embersNo") =999,"none ","<a href=""membersbysession.as p?sid=" & rs("SessionID") & """>" & rs("MembersNo") & " (view)</a>")%>
<td align="right"><%=freeslots %></td>
</tr>
<%rs.MoveNext
wend%>
</table>
</td>
</tr>
</table>
</form>
<!-- #include file="include/footer.asp" -->
-Corey
<!-- #include file="include/header.asp" -->
<%
CheckPermissionCMS(SITEOWN
dim op, sid, lid, id, rs, locationName, message, errmessage, all, monthid, sessid
op = Request.QueryString("op")
all = Request.QueryString("all")
id = Request.QueryString("id") 'member ID
sid = Request.QueryString("sid")
lid = Request.QueryString("lid")
monthid= Request.QueryString("month
sessid= Request.QueryString("sessi
If op="delmonth" Then
if not isNumeric(monthid) or monthid ="" then
rw "Script error ... no month selected"
re
end if
DeleteMonth monthid ,lid ' month and location
monthid=month(now)
op=""
End if
If op="delsess" Then
if not isNumeric(sessid) or sessid ="" then
rw "Script error ... no session selected"
re
end if
DeleteSession sessid ' session
' monthid=month(now)
op=""
End if
if not isNumeric(monthid) or monthid ="" then
monthid=month(now)
end if
if not isNumeric(lid) or lid="" then
lid = GetFirstLocationID
if lid = 0 then
rw "Please create a location first"
re
end if
end if
locationName = GetLocationDetail(lid).Loc
if op = "reg" then
if not isNumeric(id) or id = "" then
rw "Invalid Member ID:" & id
re
end if
if not isNumeric(sid) or sid="" then
rw "Invalid session ID"
re
end if
RegisterSession sid, id
rw "email: free slot for first waiting member"
SendFreeSlotMessage id, sid
end if
'if op = "add" then
'res = DeactivateSession(sid)
'if res = errNoErrors then
'message = "Session was successfully deactivated."
'else
'errmessage = msgUnknownErr
'end if
'end if
'If all=0 Then
' set rs = GetSessionList(lid)
'else
' set rs = GetSessionListAll(lid)
'End if
set rs = GetMonthSessionList(lid,mo
%>
<br>
<script language="JavaScript">
function confirm_session_delete(ses
if (confirm ("Do you really want to delete the session " + name)){
document.location = "sessionlist.asp?op=delses
//document.frmSession.subm
}
return false;
}
function confirm_month_delete(){
if (confirm ("Do you really want to delete the sessions for " + document.frmSession.monthi
location = "sessionlist.asp?lid=<%=li
}
return false;
}
</script>
<form name="frmSession" action="sessionlist.asp" method="get">
<input type="hidden" name="id" value="<%=id%>">
<input type="hidden" name="lid" value="<%=lid%>">
<input type="hidden" name="op" value="<%=op%>">
<table class="formTable" cellpadding="5" cellspacing="0" border="0" align="center" width='80%'>
<tr><td class="formTitle" colspan="2">Booking in <%=locationName%></td></tr
<%if message <> "" then%>
<tr><td class="message" colspan="2"><%=message%></
<%elseif errmessage <> "" then%>
<tr><td class="errmessage" colspan="2"><%=errmessage%
<%end if%>
<tr><td align="left" colspan="2">Show Booking for:</td></tr>
<tr>
<tr><td align="left"><select name="monthid"><%GenerateM
<input type="submit" name="deletepast" value="Delete old Sessions" onclick="return confirm_month_delete();">
</td><td align="right"><a href="session.asp?op=add&l
<tr>
<td width="100%" colspan="2">
<table cellspacing="0" cellpadding="5" width="100%" border="0">
<tr class="tableHeader">
<td width="20%">Date</td>
<td width="8%">Start</td>
<td width="8%">End</td>
<td width="24%">Session Name</td>
<td width="10%">Status</td>
<td width="5%" align="right">Registered</
<td width="10%" align="right">Confirmed</t
<td width="15%" align="right">Available</t
</tr>
<%
dim i, oddRow, firstWaitID, firstWaitName, freeSlots, firstMember, regslots, confslots
i = 0
while not rs.EOF
i = 1 - i
if i = 0 then
oddrow = "class=""highlight"""
else
oddrow = ""
end if
confslots = GetMemberNumberByStatus(rs
regslots = GetMemberNumberByStatus(rs
freeSlots = rs("slot") - confslots'Session_GetFreeS
%>
<tr <%=oddrow%>>
<td><%=FormatDateTime(rs("
<td><%=rs("StartHour") & ":" & rs("StartMin") & " " & rs("StartSuffix")%></td>
<td><%=rs("EndHour") & ":" & rs("EndMin") & " " & rs("EndSuffix")%></td>
<td><a href="session.asp?sid=<%=r
<td><%=rs("StatusName")%>&
<td align="right"><%=regslots%
<td align="right"><%=iif(rs("M
<td align="right"><%=freeslots
</tr>
<%rs.MoveNext
wend%>
</table>
</td>
</tr>
</table>
</form>
<!-- #include file="include/footer.asp" -->
-Corey
NO, ExecuteSQL is being called somewhere in the error page.
ASKER
Wel here is the page that is being called:
<!-- #include file="include/header.asp" -->
<script language="JavaScript">
function DoSubmit(op,sid,id) {
document.frmMembersBySessi on.op.valu e = op;
document.frmMembersBySessi on.id.valu e = id;
document.frmMembersBySessi on.sid.val ue = sid;
document.frmMembersBySessi on.submit( );
}
function SaveNote(msid) {
document.frmMembersBySessi on.msid.va lue = msid;
document.frmMembersBySessi on.submit( );
}
function ConfAll(id) {
document.frmMembersBySessi on.id.valu e = id;
document.frmMembersBySessi on.call.va lue = 'A';
document.frmMembersBySessi on.submit( );
}
</script>
<%
'show members in a session
CheckPermissionCMS(SITEOWN ER)
dim op, id, sid, rs, sessionName, message, errmessage, registeredNo, confirmedNo, action, actionmsg, totalNo
dim sessiondate, sessionhour, sessionminute, sessionsuffix, msid, note
if Request.Form("fromSubmit") <> "yes" then
sid = Request.QueryString("sid") 'session ID
if not isNumeric(sid) or sid="" then
rw "Invalid session ID"
re
end if
else
if Request.Form("msid") <> "" then
msid = request.Form("msid")
note = request.Form("comments" & msid)
Call SaveNote(msid, note)
response.redirect "membersbysession.asp?sid= " & request.Form("sid")
end if
If Request.Form("call") = "A" then
' confirm all
dim callx, callxar, i
sid = Request.Form("sid")
If request.Form("callx") <> "" Then
callx = request.Form("callx")
callxar = split(callx,",")
For i = 0 to Ubound(callxar)
ConfirmSession sid, callxar(i)
Next
else
rw "!!! Nothing to Confirm!"
End if
end if
id = Request.Form("id")
op = Request.Form("op")
sid = Request.Form("sid")
if op <> "" then
if not isNumeric(id) or id = "" then
rw "Invalid Member ID:" & id
re
end if
if not isNumeric(sid) or sid="" then
rw "Invalid session ID"
re
end if
if op = "C" then
ConfirmSession sid, id
elseif op = "R" then
session("who")="A"
RegisterSession sid, id
elseif op = "X" then
CancelSession sid, id
elseif op = "L" then
LateCancelSession sid, id
elseif op = "W" then
WaitSession sid, id
end if
end if
end if
sessionName = GetSessionDetail(sid).Sess ionName
sessionDate = GetSessionDetail(sid).Sess ionDate
sessionHour = GetSessionDetail(sid).Star tHour
sessionMinute = GetSessionDetail(sid).Star tMin
sessionSuffix = GetSessionDetail(sid).Star tSuffix
confirmedNo = GetMemberNumberByStatus(si d, "C")
registeredNo = GetMemberNumberByStatus(si d, "R")
totalNo = confirmedNo + registeredNo
set rs = GetMemberListBySession(sid )
%>
<br>
<form name="frmMembersBySession" action="membersbysession.a sp" method="post">
<input type="hidden" name="id" value="">
<input type="hidden" name="op" value="">
<input type="hidden" name="sid" value="<%=sid%>">
<input type="hidden" name="msid" value="">
<input type="hidden" name="call" value="">
<input type="hidden" name="fromSubmit" value="yes">
<table class="formTable" cellpadding="5" cellspacing="0" border="0" align="center" width='80%'>
<tr><td class="formTitle">Members in <%=sessionName%> (<%=f ormatdatet ime(sessio ndate,1)%>  <%=se ssionhour% >:<%=sessi onminute%>  <%=sessionsuffix%>)&n bsp;[<%=co nfirmedNo% > member<%=iif(CInt(confirme dNo)<>1,"s ","")%> confirmed]</td></tr>
<%if message <> "" then%>
<tr><td class="message"><%=message %></td></t r>
<%elseif errmessage <> "" then%>
<tr><td class="errmessage"><%=errm essage%></ td></tr>
<%end if%>
<tr><td> </td></tr>
<tr><td align="right"><a href="memberadd.asp?sid=<% =sid%>">ad d member to session</a></td></tr>
<tr>
<td width="100%">
<table cellspacing="0" cellpadding="2" width="100%" border="0">
<tr class="tableHeader">
<td width="3%"></td>
<td width="10%">Name</td>
<td width="5%">Booking</td>
<td width="5%">Sess. left</td>
<td width="10%">Update</td>
<td width="10%">Status</td>
<td width="5%">Added By</td>
<td width="10%">Due</td>
<td width="20%">Note</td>
<td width="5%"> </td>
<td width="15%" align="center">Action</td>
</tr>
<%
dim oddRow
i = 0
while not rs.EOF
action = AvailableActionsCMS(sid, totalNo, rs("StatusCode"), rs("memberID"), actionmsg)
i = 1 - i
if i = 0 then
oddrow = "class=""highlight"""
else
oddrow = ""
end if%>
<tr <%=oddrow%>>
<td><input type="checkbox" name="callx" value="<%=rs("memberID")%> " <%If rs("StatusCode")<>"R" or actionmsg="passed session" Then%>disabled<%
End if%>></td>
<td><a href="member.asp?id=<%=rs( "memberID" )%>"><%=En code(rs("F irstName") & " " & rs("LastName"))%></a></td>
<td><a href="sessionsbymember.asp ?id=<%=rs( "memberID" )%>">(view )</a></td>
<td><%=rs("SessionsLeft")% ></td>
<td><%=FormatDateTime(rs(" RegisterDa te"),vbSho rtDate)%>< /td>
<td>
<%=iif(rs("StatusCode")="C ","<b>","" )%><%=Enco de(rs("Sta tusName")) %><%=iif(r s("StatusC ode")="C", "</b>","") %>
<%if (action = "X" or action = "L") and rs("StatusCode") <> "C" then%>
<input class="redbutton" type="button" name="action" value="Confirm" onClick="javascript:DoSubm it('C',<%= sid%>,<%=r s("memberI D")%>);">
<%end if%>
</td>
<td><%=rs("registeredby")% ></td>
<td><%If rs("SessionsLeft")<=0 Then
GetLastConfirmed rs("memberID")
else%>
Unknown
<%End if%>
</td>
<td><textarea rows="2" cols="15" name="comments<%=rs("membe rsessionID ")%>"><%=r s("Comment s")%></tex tarea></td >
<td><input type="image" src="images/save.gif" value="savenote" alt="save comment" onClick="javascript:SaveNo te(<%=rs(" membersess ionID")%>) ;">
</td>
<td>
<%if actionmsg = "" then
ActionLinkCMS action, sid, rs("memberID") ' id
else
rw actionmsg
If actionmsg = "confirmed" Then
rw vbCRLF
ActionLinkCMS action, sid, rs("memberID") ' id
End if
end if%>
</td>
</tr>
<%rs.MoveNext
wend%>
<tr><td colspan=9> </td></tr>
<tr><td colspan=9><input type="button" class="button" value="Confirm all selected" onClick="javascript:ConfAl l(<%=sid%> );"></td>< /tr>
</table>
</td>
</tr>
</table>
</form>
<!-- #include file="include/footer.asp" -->
(file name: membersbysession.asp?sid=5 24) - does that hopefully help?
<!-- #include file="include/header.asp" -->
<script language="JavaScript">
function DoSubmit(op,sid,id) {
document.frmMembersBySessi
document.frmMembersBySessi
document.frmMembersBySessi
document.frmMembersBySessi
}
function SaveNote(msid) {
document.frmMembersBySessi
document.frmMembersBySessi
}
function ConfAll(id) {
document.frmMembersBySessi
document.frmMembersBySessi
document.frmMembersBySessi
}
</script>
<%
'show members in a session
CheckPermissionCMS(SITEOWN
dim op, id, sid, rs, sessionName, message, errmessage, registeredNo, confirmedNo, action, actionmsg, totalNo
dim sessiondate, sessionhour, sessionminute, sessionsuffix, msid, note
if Request.Form("fromSubmit")
sid = Request.QueryString("sid")
if not isNumeric(sid) or sid="" then
rw "Invalid session ID"
re
end if
else
if Request.Form("msid") <> "" then
msid = request.Form("msid")
note = request.Form("comments" & msid)
Call SaveNote(msid, note)
response.redirect "membersbysession.asp?sid=
end if
If Request.Form("call") = "A" then
' confirm all
dim callx, callxar, i
sid = Request.Form("sid")
If request.Form("callx") <> "" Then
callx = request.Form("callx")
callxar = split(callx,",")
For i = 0 to Ubound(callxar)
ConfirmSession sid, callxar(i)
Next
else
rw "!!! Nothing to Confirm!"
End if
end if
id = Request.Form("id")
op = Request.Form("op")
sid = Request.Form("sid")
if op <> "" then
if not isNumeric(id) or id = "" then
rw "Invalid Member ID:" & id
re
end if
if not isNumeric(sid) or sid="" then
rw "Invalid session ID"
re
end if
if op = "C" then
ConfirmSession sid, id
elseif op = "R" then
session("who")="A"
RegisterSession sid, id
elseif op = "X" then
CancelSession sid, id
elseif op = "L" then
LateCancelSession sid, id
elseif op = "W" then
WaitSession sid, id
end if
end if
end if
sessionName = GetSessionDetail(sid).Sess
sessionDate = GetSessionDetail(sid).Sess
sessionHour = GetSessionDetail(sid).Star
sessionMinute = GetSessionDetail(sid).Star
sessionSuffix = GetSessionDetail(sid).Star
confirmedNo = GetMemberNumberByStatus(si
registeredNo = GetMemberNumberByStatus(si
totalNo = confirmedNo + registeredNo
set rs = GetMemberListBySession(sid
%>
<br>
<form name="frmMembersBySession"
<input type="hidden" name="id" value="">
<input type="hidden" name="op" value="">
<input type="hidden" name="sid" value="<%=sid%>">
<input type="hidden" name="msid" value="">
<input type="hidden" name="call" value="">
<input type="hidden" name="fromSubmit" value="yes">
<table class="formTable" cellpadding="5" cellspacing="0" border="0" align="center" width='80%'>
<tr><td class="formTitle">Members in <%=sessionName%> (<%=f
<%if message <> "" then%>
<tr><td class="message"><%=message
<%elseif errmessage <> "" then%>
<tr><td class="errmessage"><%=errm
<%end if%>
<tr><td> </td></tr>
<tr><td align="right"><a href="memberadd.asp?sid=<%
<tr>
<td width="100%">
<table cellspacing="0" cellpadding="2" width="100%" border="0">
<tr class="tableHeader">
<td width="3%"></td>
<td width="10%">Name</td>
<td width="5%">Booking</td>
<td width="5%">Sess. left</td>
<td width="10%">Update</td>
<td width="10%">Status</td>
<td width="5%">Added By</td>
<td width="10%">Due</td>
<td width="20%">Note</td>
<td width="5%"> </td>
<td width="15%" align="center">Action</td>
</tr>
<%
dim oddRow
i = 0
while not rs.EOF
action = AvailableActionsCMS(sid, totalNo, rs("StatusCode"), rs("memberID"), actionmsg)
i = 1 - i
if i = 0 then
oddrow = "class=""highlight"""
else
oddrow = ""
end if%>
<tr <%=oddrow%>>
<td><input type="checkbox" name="callx" value="<%=rs("memberID")%>
End if%>></td>
<td><a href="member.asp?id=<%=rs(
<td><a href="sessionsbymember.asp
<td><%=rs("SessionsLeft")%
<td><%=FormatDateTime(rs("
<td>
<%=iif(rs("StatusCode")="C
<%if (action = "X" or action = "L") and rs("StatusCode") <> "C" then%>
<input class="redbutton" type="button" name="action" value="Confirm" onClick="javascript:DoSubm
<%end if%>
</td>
<td><%=rs("registeredby")%
<td><%If rs("SessionsLeft")<=0 Then
GetLastConfirmed rs("memberID")
else%>
Unknown
<%End if%>
</td>
<td><textarea rows="2" cols="15" name="comments<%=rs("membe
<td><input type="image" src="images/save.gif" value="savenote" alt="save comment" onClick="javascript:SaveNo
</td>
<td>
<%if actionmsg = "" then
ActionLinkCMS action, sid, rs("memberID") ' id
else
rw actionmsg
If actionmsg = "confirmed" Then
rw vbCRLF
ActionLinkCMS action, sid, rs("memberID") ' id
End if
end if%>
</td>
</tr>
<%rs.MoveNext
wend%>
<tr><td colspan=9> </td></tr>
<tr><td colspan=9><input type="button" class="button" value="Confirm all selected" onClick="javascript:ConfAl
</table>
</td>
</tr>
</table>
</form>
<!-- #include file="include/footer.asp" -->
(file name: membersbysession.asp?sid=5
Well, this line rs.Open comm, is nowhere in that page, so you are giving the wrong information!
ASKER
Well after looking more at the includes - I see the query.asp is actually included - but I am not certain what I am looking for.. Is ExecuteSQL exactly what I am looking for?
-Corey
-Corey
you are looking for either a function or a sub with the name ExecuteSQL I guess. You need to find it on one of the page (probably one of the include pages) coz you didnt find it on the code you posted here.
:) SD
:) SD
Sounds like you do not have an Entry in the Database for what you are trying to call.
i.e.
Search for "something"
And "something" is in the Table.Field = Things
"Something" is not actually in that Table.Field.
Do you follow me?
Check to make sure that the Data exist in the Table.Field before running the script.
I get this error All The Time. In the site that I am designing.
Info:
Database = Your have "Tables" in the Database.
Inside the Tables = Are "Fields"
You need to look through the Fields to make sure that everything that
You are wanting to retrieve, exist in the proper Fields.
Carrzkiss
i.e.
Search for "something"
And "something" is in the Table.Field = Things
"Something" is not actually in that Table.Field.
Do you follow me?
Check to make sure that the Data exist in the Table.Field before running the script.
I get this error All The Time. In the site that I am designing.
Info:
Database = Your have "Tables" in the Database.
Inside the Tables = Are "Fields"
You need to look through the Fields to make sure that everything that
You are wanting to retrieve, exist in the proper Fields.
Carrzkiss
ASKER
The programmer finally got back about midnight & fixed this problem. SD you were on the right track @ least & kept pointing me to the right stuff.
Thanks!
-Corey
Thanks!
-Corey
@ coreybryant -
> SD you were on the right track
No! I just paraphrased what alorentz was saying! I think he deserves the credit!
:) SD
> SD you were on the right track
No! I just paraphrased what alorentz was saying! I think he deserves the credit!
:) SD
ASKER
Sorry I only thought one person was talking - there was a lot of information here
-Corey
-Corey
ASKER
-Corey