<% ' FP_ASP -- ASP Automatically generated by a FrontPage Component. Do not Edit. FP_CharSet = "windows-1252" FP_CodePage = 1252 %> <% Dim switch Dim continue Dim limit switch=Request.Form("switch") if isempty(switch) then switch=Session("switch1") else Session("switch1")=switch end if continue=Request.Form("continue") if continue="latest" then Session("startfrom")=Session("lastno")+1 else Session("startfrom")=1 end if limit=30000 %> <% if 0 then %> <% end if %> <% fp_sQry="SELECT * FROM AHRBAll WHERE (RHYME LIKE '::RHYME::' AND RHYMEWORD LIKE '::RHYMEWORD::' AND RHYTHM LIKE '::RHYTHM::' AND ALLITS LIKE '::ALLITS::' AND ACCVOW LIKE '::ACCVOW::' AND INITS LIKE '::INITS::' AND inits2 LIKE '::inits2::' AND MANNER LIKE '::MANNER::' AND odds LIKE '::odds::' AND evens LIKE '::evens::' AND Wordpatterns LIKE '::Wordpatterns::' AND Accvow2 LIKE '::Accvow2::' AND TEXT LIKE '::TEXT::' AND REF LIKE '::REF::' AND VERSETYPE LIKE '::VERSETYPE::' AND LINE LIKE '::LINE::' AND NAME LIKE '::NAME::' AND SCANLINE LIKE '::SCANLINE::' AND [LINENO] LIKE '::LINENO::' AND [ID] >= '::ID::') ORDER BY ID ASC" fp_sDefault="RHYME=%&RHYMEWORD=%&RHYTHM=%&ALLITS=%&ACCVOW=%&INITS=%&MANNER=%&odds=%&evens=%&Wordpatterns=%&Accvow2=%&TEXT=%&REF=%&VERSETYPE=%&LINENO=%&LINE=%&SCANLINE=%&NAME=%&inits2=%&ID=" & Session("startfrom") fp_sNoRecords="

No matching lines found!

Do you need to clear any search boxes...?

Do you need to put in any wildcard characters? Click for instructions.

Are there unwanted blanks anywhere...?

" fp_sDataConn="sql" fp_iMaxRecords=limit fp_iCommandType=1 fp_iPageSize=1 fp_fTableFormat=False fp_fMenuFormat=False fp_sMenuChoice="ID" fp_sMenuValue="ID" fp_sColTypes="&ID=3&RHYME=202&RHYMEWORD=202&RHYTHM=202&ALLITS=202&ACCVOW=202&INITS=202&MANNER=202&odds=202&evens=202&Wordpatterns=202&Accvow2=202&TEXT=202&REF=202&VERSETYPE=202&LINENO=202&LINE=202&SCANLINE=202&inits2=202&NAME=202&Textlink=202" fp_iDisplayCols=21 fp_fCustomQuery=False BOTID=0 fp_iRegion=BOTID %>

Results page
  • Click labels for information
    •  
    Name of text <%=FP_FieldVal(fp_rs,"NAME")%> Metre <%=FP_FieldVal(fp_rs,"VERSETYPE")%> rima
    Line reference <%=FP_FieldVal(fp_rs,"REF")%> Line position Line <%=FP_FieldVal(fp_rs,"LINENO")%> <% if FP_FieldVal(fp_rs,"VERSETYPE")="3a" then versex="terzina" else versex="ottava" End if %> in <%=versex%>
    Line <%=FP_FieldVal(fp_rs,"LINE2")%>
     
    Rhyme word <%=FP_FieldVal(fp_rs,"RHYMEWORD2")%> Rhyme <%=FP_FieldVal(fp_rs,"RHYME")%>
     
    All phonemes <%=FP_FieldVal(fp_rs,"ALLITS")%>
    ...by manner <%=FP_FieldVal(fp_rs,"MANNER")%>
    Initial phonemes <%=FP_FieldVal(fp_rs,"INITS")%> ...by manner <%=FP_FieldVal(fp_rs,"inits2")%>
    Accented vowels <%=FP_FieldVal(fp_rs,"ACCVOW")%> ...in text <%=FP_FieldVal(fp_rs,"Accvow2")%>
     
    Scanned line <%=FP_FieldVal(fp_rs,"SCANLINE")%>
    Rhythm <%=FP_FieldVal(fp_rs,"RHYTHM")%> Even <%=FP_FieldVal(fp_rs,"evens")%> <% if FP_FieldVal(fp_rs,"evens")="1" then evensx="accent" else evensx="accents" End if %> <%=evensx%> Odd <%=FP_FieldVal(fp_rs,"odds")%> <% if FP_FieldVal(fp_rs,"odds")="1" then oddsx="accent" else oddsx="accents" End if %> <%=oddsx%>
    Word accents <%=FP_FieldVal(fp_rs,"Wordpatterns")%> Record <%Session("lastno")=FP_FieldVal(fp_rs,"id")%> <%=Session("lastno")%>
     
    <%="Browse this text"%> Searching instructions Search form
    Matching single lines
    Click to change text