遺品DB検索ページ


大分類指定 その他条件
1.原稿

2.芸術関係

3.書簡

4.写真

5.生活用品

6.ひとのみち関係

7.蔵書

全巻を検索
巻数を指定 
未掲載



<% Sub SetChuBunrui Set MyCon = Session("xxxNDB") Sql = "M_CYUBUNRUI" Set MyRS = MyCon.Execute(SQL) Do While (Not MyRS.Eof) If MyRS.Fields("中分類コード") <> 29 then Response.Write "" & vbcrlf End If MyRS.MoveNext Loop MyRS.Close End Sub %>