SQL Server Performance

Searching...

Discussion in 'Please Tell Us What You Think' started by brimba, Dec 16, 2005.

  1. brimba New Member

    Hello!

    Would be nice if you could change the memberlist-dropdown to a regular input field. Since the community is growing it takes forever (not really but its annoying) to load the search page.

    I think its pretty easy to write the author name in there.
  2. FrankKalis Moderator

  3. Madhivanan Moderator

    In the Search by author list select the author name

    Madhivanan

    Failing to plan is Planning to fail
  4. ranjitjain New Member

    But can We have filter to populate the Result.
    I mean it should populate only those names who has poted in last six months.
    with an link to have all member names.
  5. bradmcgehee New Member

    If anyone knows of a mod, or wants to write the code, I will implement it. I am not much of an ASP developer. Below is the relevant code, I think:



    " <tr>" & vbNewLine & _
    " <td bgColor=""" & strPopUpTableColor & """ align=""right"" valign=""middle""><b><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """>Search By Member:</font></b></td>" & vbNewLine
    if strUseMemberDropDownBox = 0 then
    Response.Write" <td bgColor=""" & strPopUpTableColor & """ align=""left"" valign=""middle""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><input name=""SearchMember"" value="""" size=""25""></font></td>" & vbNewLine
    else
    Response.Write" <td bgColor=""" & strPopUpTableColor & """ align=""left"" valign=""middle"">" & vbNewLine & _
    " <select name=""SearchMember"">" & vbNewLine & _
    " <option value=""0"">All Members</option>" & vbNewLine
    '## Forum_SQL
    strSql = "SELECT MEMBER_ID, M_NAME "
    strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS"
    strSql = strSql & " WHERE M_STATUS = " & 1
    strSql = strSql & " ORDER BY M_NAME ASC;"

    set rs = Server.CreateObject("ADODB.Recordset")
    rs.open strSql, my_Conn, adOpenForwardOnly, adLockReadOnly, adCmdText

    if rs.EOF then
    recMemberCount = ""
    else
    allMemberData = rs.GetRows(adGetRowsRest)
    recMemberCount = UBound(allMemberData,2)
    meMEMBER_ID = 0
    meM_NAME = 1
    end if

    rs.close
    set rs = nothing

    if recMemberCount <> "" then
    for iMember = 0 to recMemberCount
    MembersMemberID = allMemberData(meMEMBER_ID, iMember)
    MembersMemberName = allMemberData(meM_NAME, iMember)
    Response.Write" <option value=""" & MembersMemberID & """>" & ChkString(MembersMemberName,"display") & "</option>" & vbNewline
    next
    end if
    Response.Write" </select>" & vbNewLine & _
    " </td>" & vbNewLine
    end if
    Response.Write" </tr>" & vbNewLine & _
    " <tr>" & vbNewLine & _
    " <td bgColor=""" & strPopUpTableColor & """ align=""center"" valign=""middle"" colspan=""2""><input type=""submit"" value=""Search""></td>" & vbNewLine & _
    " </tr>" & vbNewLine & _
    " </table>" & vbNewLine & _
    " </td>" & vbNewLine & _
    " </tr>" & vbNewLine & _
    " </table>" & vbNewLine & _
    " </form>" & vbNewLine
    end if
    WriteFooter
    Response.End

    -----------------------------
    Brad M. McGehee, MVP
    Webmaster
    SQL-Server-Performance.Com
  6. brimba New Member

    You could replace that code with

    " <tr>" & vbNewLine & _
    " <td bgColor=""" & strPopUpTableColor & """ align=""right"" valign=""middle""><b><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """>Search By Member:</font></b></td>" & vbNewLine
    if strUseMemberDropDownBox = 0 then
    Response.Write " <td bgColor=""" & strPopUpTableColor & """ align=""left"" valign=""middle"">" & vbNewLine & _
    " <input type=""text"" name=""SearchMember"" size=""25"" value="""">" & vbNewLine & _



    but Then you would probably also have to change the sql-statement that performs the search. This is since the defaultvalue today for "everyone" is "0", and we change that to "". The where-statement may also be "where username = 'INPUT'", which has to be changed to "where username like 'INPUT%'"

Share This Page