This is a iw_iterate code i have. But when I do this I always end up with an extra <li></li> which adds a blank bullet. [html] ]]> <li><br> <a href="{iw_value name='element.link'/}?id=<%=leftNavId%>"><br> {iw_value name="element.label"/}</a> <br> <br> <!--#include virtual="/members/_includes/group_check_wellness.asp"--><br> <%if trim(strGroup) = "10040000" then %><br> <li><a href="../wellness/index.asp?id=<%=leftNavId%>" target="new"><b><font color="Red">Wellness Program</font></b></a></li><br> <%end if %><br> <li><!--#include virtual="/brokers/_includes/groupquotinglink.asp"--></li><br> <%if GetClaimsCorrectionPermission(leftNavId) = 1 then %><br> <li><a href="https://<%=request.servervariables("SERVER_NAME")%>/bci_v2/providers/ClaimsCorrection/ClaimsCorrection_Begin.aspx?id=<%=leftNavId%>"><img Height="85px" Width="140px" src="/_images/Claims_graphic2.jpg" border="0" /></a></li><br> <%end if<br> <br> '******************************************************************************<br> 'Check for research and reporting link<br> '******************************************************************************<br> strSQL = "Select 'x' From BCI_CLIENT_RESEARCH_ACCESS"<br> strSQL = strSQL & " WHERE user_nm = (SELECT user_nm FROM site_user"<br> strSQL = strSQL & " WHERE user_id = (SELECT user_id"<br> strSQL = strSQL & " FROM site_session"<br> strSQL = strSQL & " WHERE session_GUID = '" & request("id") & "'))"<br><br> strConnection = "Driver={SQL Server};Server=EXTSQL1;Database=BCI_WEBII;Uid=BCISelect;Pwd=newpass;"<br> Set rsNAV1=Server.CreateObject("ADODB.Recordset")<br> With rsNAV1<br> .source = strSQL<br> .ActiveConnection = strConnection<br> .CursorType = adOpenStatic<br> .Open<br> End With<br> If Not rsNAV1.EOF then<br> Response.Write "<li><a href='https://reporting.bcidaho.com' target='_blank'>Client Research Reporting</a></li>"<br> End If<br> %><br> </ul><br></div><br></div><br> <br><%<br>function GetClaimsCorrectionPermission(strFuncGuid)<br><br> dim conn ' DB Connection<br> dim rs ' RecordSet<br> dim strSQL ' Select SQL Statement<br> dim strConn ' Connection to SQL Server with read-only access<br> <br> strConn = "Driver={SQL Server};Server=EXTSQL1;Database=BCI_WEBII;Uid=BCIInsert;Pwd=newpass;"<br><br> ' Create instance of connection object<br> Set conn = Server.CreateObject("ADODB.Connection")<br> ' Create instance of recordset object<br> Set rs = Server.CreateObject("ADODB.RecordSet")<br> <br> ' Set up the query<br> strSQL = "SELECT claims_correction " & _<br> "FROM P_USER " & _<br> "WHERE P_USER.user_id = (SELECT DISTINCT user_id FROM SITE_SESSION WHERE SESSION_GUID = '" & strFuncGuid & "')"<br> <br> ' Open the connection<br> conn.open strConn<br> <br> ' Fill the recordset<br> rs.open strSQL, conn<br> <br> ' Check to see if the record set is empty.<br> if not rs.EOF then<br> GetClaimsCorrectionPermission = rs("claims_correction")<br> else<br> GetClaimsCorrectionPermission = 0<br> end if<br> <br> ' Close the recordset<br> rs.Close<br> ' Close the connection<br> conn.close<br> <br> ' Clean up<br> set rs = nothing<br> set conn = nothing<br> <br>end function<br>%><br><br>[/html]Can anyone tell me why I am getting this error. Thank you
This is how the output from the file looks. [html] Broker Home Customer Service FAQ Online Forms Newsletters Blue Extras [/html]Thank you