<% Dim idx, rs Set idx = Server.CreateObject("IXSSO.Query") idx.Catalog = "www.shakespeare-online.com" idx.Columns = "Characterization,Size,Vpath,Rank,Filename,DocTitle" idx.SortBy = "Rank[d]" idx.MaxRecords = 100 idx.Query = Request.QueryString("Query") Set rs = idx.CreateRecordset("sequential") %> Violence in Shakespeare: Suicide, Murder, and Combat in Shakespeare's Plays
directory
home contact

Search Results