set Kword4 to item 2 of item 4 of userMsg set Kword5 to item 2 of item 5 of userMsg set Kword6 to item 2 of item 6 of userMsg set Kword7 to item 2 of item 7 of userMsg set Kword8 to item 2 of item 8 of userMsg set Kword9 to item 2 of item 9 of userMsg tell application”ファイルメーカーPro"try set my List to every Record whose Cell”巻”isKwordl 7 and Cell”葉”isKword27 and Cell”作家名和文”isKword37 and Cell”作家名欧文”isKword47 and Cell”シリーズ名和文”isKword57 and Cell”シリーズ名欧文”isKword67 and Cell”作品名和文”isKword77 and Cell”作品名欧文”isKword87 and Cell”作品名英文”isKword9 on error set my List to { } end try end tell ーーファイルメーカーに検索を指示ーエラーが起きたら該当レコードなしということif my List is not { } then ーー該当レコードが1つだった場合は，リストの型変換を行うif class of item 1 of myList is not list then set myList to {myList} --URLのデータを変数に代入-351-
元のページ ../index.html#360