Warning: include(../includes/connection-seconddb.php): Failed to open stream: No such file or directory in /home/not/public_html/jayalakshmi/fyf-old/aspadmin/babynamessearch.php on line 1

Warning: include(): Failed opening '../includes/connection-seconddb.php' for inclusion (include_path='.:/opt/cpanel/ea-php81/root/usr/share/pear') in /home/not/public_html/jayalakshmi/fyf-old/aspadmin/babynamessearch.php on line 1
Baby Names-Baby Names Directory/Names List
Home

Search Names   Origin List    Names List    Menu

<% set conn = server.CreateObject("adodb.connection") set rs = server.CreateObject("adodb.recordset") conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("..") & "\data\names.mdb;" if request("mode")="del" then 'for i = 1 to Request.Form("chkID").count 'con.execute "delete from pagename where sno= " & Clng(0 & Request.Form("chkID")(iCnt)) 'next conn.execute "delete from babynames where id in (" & request.form("no") & ")" response.Redirect("babynamessearchlist.php?name="&request("name")) end if rs.open "select * from babynames where name like '" &request("name")& "%' order by id desc",conn,3,2 %>
Baby Names- Search List

<% if rs.eof<>true then psize=30 Rs.PageSize =psize TotalPages = Rs.PageCount iCnt = 0 if request.QueryString("page") <> "" then pageNo=request.QueryString("page") else pageNo=1 end if if rs.recordcount <= 30 then rowcnt=rs.recordcount else rowcnt=rs.recordcount-((pageno*rs.pagesize)-rs.pagesize) end if If Request("page") = "" or Clng(Request("page")) > TotalPages then Rs.AbsolutePage = 1 Else if Clng(0 & Request("page")) > 1 then rCnt = rCnt - (Rs.PageSize * (Clng(0 & Request("page"))-1)) End If Rs.AbsolutePage = Clng(0 & Request("page")) End If%> <% while not rs.eof and iCnt < Rs.PageSize %> <% rs.MoveNext iCnt = iCnt + 1 rowcnt=rowcnt-1 wend %>
S.No
 Name
 Origin
 Meaning
>" style="color:#000000;"><%=rowcnt%> "><%= rs("Name")%> <%= rs("origin")%> <%= rs("meaning")%>



<% intCurrentPage = Request.Querystring("page") IF intCurrentPage = "" THEN intCurrentPage = 1 intNumberOfPages = int(RS.RecordCount \ 30) IF RS.RecordCount MOD 30<> 0 THEN intNumberOfPages = intNumberOfPages + 1 if request("pos")="" then if intNumberOfPages>10 then no=request.QueryString("page") if request.QueryString("page")="" or request.QueryString("page")=1 or request.QueryString("page")<=10 then FOR intDisplayPage = 1 TO 10 IF Cint(intDisplayPage) = Cint(intCurrentPage) THEN Response.Write " " & intDisplayPage & " " ELSE Response.Write " " & intDisplayPage &" " END IF NEXT if request.QueryString("page")=totalpages then else Response.Write " >> " &" Next" &" " end if elseif request.QueryString("page")>=10 then Response.Write " << " &" Previous " &" " j=1 FOR i =no-9 TO no IF Cint(i) = Cint(intCurrentPage) THEN Response.Write " " & i & " " ELSE Response.Write " " & i &" " END IF j=j+1 NEXT if request.QueryString("page")=totalpages then else Response.Write " >> " &" Next" &" " end if else TotalPages = rs.PageCount end if else FOR intDisplayPage = 1 TO intNumberOfPages IF Cint(intDisplayPage) = Cint(intCurrentPage) THEN Response.Write " " & intDisplayPage & " | " ELSE Response.Write " " & intDisplayPage &" | " END IF NEXT end if else no= request.QueryString("page") if request("pos")="1" then k=request("pos") Response.Write "<< " &"Previous"&"  " FOR i =no TO no+9 IF Cint(i) = Cint(request.QueryString("page")) THEN j=k Response.Write " " & i & " | " ELSE k=k+1 Response.Write " " & i &" | " END IF NEXT if request.QueryString("page")=totalpages then else Response.Write " >> " &" Next" &" " end if end if if request("pos")="2" then Response.Write " << " &"Previous"&"  " k=1 FOR i =no-1 TO no+8 IF Cint(i) = Cint(request.QueryString("page")) THEN j=k Response.Write " " & i & " | " ELSE Response.Write " " & i &" | " END IF k=k+1 NEXT if request.QueryString("page")=totalpages then else Response.Write " >> " &" Next" &" " end if end if if request("pos")="3" then Response.Write " << "&"Previous"&"  " k=1 FOR i =no-2 TO no+7 IF Cint(i) = Cint(request.QueryString("page")) THEN j=k Response.Write " " & i & " | " ELSE Response.Write " " & i &" | " END IF k=k+1 NEXT if request.QueryString("page")=totalpages then else Response.Write " >> " &" Next" &" " end if end if if request("pos")="4" then Response.Write " <<  Previous   " k=1 FOR i =no-3 TO no+6 IF Cint(i) = Cint(request.QueryString("page")) THEN j=k Response.Write " " & i & " | " ELSE Response.Write " " & i &" | " END IF k=k+1 NEXT if request.QueryString("page")=totalpages then else Response.Write " >> " &" Next" &" | " end if end if if request("pos")="5" then Response.Write " << " &"Previous" &"  " k=1 FOR i =no-4 TO no+5 IF Cint(i) = Cint(request.QueryString("page")) THEN j=k Response.Write " " & i & " |" k1=k ELSE Response.Write " " & i &" | " END IF k=k+1 NEXT if request.QueryString("page")=totalpages then else Response.Write " << " &" Next" &" " end if end if if request("pos")="6" then Response.Write " << " &" Previous" &"  " k=1 FOR i =no-5 TO no+4 IF Cint(i) = Cint(request.QueryString("page")) THEN j=k Response.Write " " & i & " | " ELSE Response.Write " " & i &" |" END IF k=k+1 NEXT if request.QueryString("page")=totalpages then else Response.Write " >> "&"Next"&" " end if end if if request("pos")="7" then Response.Write " << " &" Previous" &"  " k=1 FOR i =no-6 TO no+3 IF Cint(i) = Cint(request.QueryString("page")) THEN j=k Response.Write " " & i & " | " ELSE Response.Write " " & i &" | " END IF k=k+1 NEXT if request.QueryString("page")=totalpages then else Response.Write " >> " &" Next" &" " end if end if if request("pos")="8" then Response.Write " << " &" Previous" &"  " k=1 FOR i =no-7 TO no+2 IF Cint(i) = Cint(request.QueryString("page")) THEN j=k Response.Write " " & i & " | " ELSE Response.Write " " & i &" |" END IF k=k+1 NEXT if request.QueryString("page")=totalpages then else Response.Write " >> " &" Next" &" " end if end if if request("pos")="9" then Response.Write " << " &" Previous" &"  " k=1 FOR i =no-8 TO no+1 IF Cint(i) = Cint(request.QueryString("page")) THEN j=k Response.Write " " & i& " " ELSE Response.Write " " & i &" | " END IF k=k+1 NEXT if request.QueryString("page")=totalpages then else Response.Write " >> " &" Next" &" " end if end if if request("pos")="10" then Response.Write " << " &" Previous" &"  " k=1 FOR i =no-9 TO no IF Cint(i) = Cint(request.QueryString("page")) THEN j=k Response.Write " " & i & " | " ELSE Response.Write " " & i &" | " END IF k=k+1 NEXT if request.QueryString("page")=totalpages then else Response.Write " >> " &" Next" &" " end if end if end if else%>

No Records Found

<% end if rs.close set rs=nothing conn.close set conn=nothing%>