<%@LANGUAGE=VBScript%>

トップページ 伊丹産業振興シニアアドバイザー制度 経営部門 ■ ■ 伊丹産業振興シニアアドバイザー制度 ■ ■ 一線を退いた退職者の方などに「シニアアドバイザー」として登録いただき、これまで培ってきた豊富な知識や経験を生かし、地元の中小企業にて助言、指導などアドバイスを提供する制度です。 <% set db = server.createobject("ADODB.Connection") db.Provider = "Microsoft.Jet.OLEDB.4.0" '元データベースを開く db.ConnectionString = Server.MapPath("SAHP.mdb") db.open 'テーブルの選択（テーブルから読み込む） set rec = db.execute("Select * From HP") '表のタイトル（見出し） Response.Write "" Response.Write "" Response.Write "" Response.Write "" Response.Write "" Response.Write "" Response.Write "" '100までループ Do Until rec.Fields.Item("No") >= 100 '次のレコードにポインタを移動する rec.MoveNext IF rec.Fields.Item("BUNYA") = 2 Then Response.Write "" '内容を表示する Response.Write "" Select Case rec.Fields.Item("BUNYA") Case 2 Response.Write "" Case Else Response.Write("Error") End Select Response.Write "" Response.Write "" Response.Write "" End IF Loop Response.Write " No. 分野 得意分野 アピール " & rec.Fields.Item("No") & " 経営 " & rec.Fields.Item("TOKUI") & " " & rec.Fields.Item("APPEAL") & " " '開いていたレコードセットを閉じる rec.Close '開いていたデータベースを閉じる db.Close Set db = Nothing %> 　　技術専門 　　経営専門 　　金融税務専門 〒664-0895　兵庫県伊丹市宮ノ前２−２−２ TEL：072-773-5007　FAX：072-778-6262 URL：http://www.meditam.org/ Mail：postmaster@meditam.org 各ページに掲載の記事・写真などの無断転載を禁じます。 Copyright(C)Itami city 2001-2008.All rights reserved.	シニアアドバイザー登録について 来館・FAX・インターネットにてお申し込みいただけます。 詳しくは【　こちら　】をごらんください。 現在登録されているアドバイザー一覧 技術専門 金融税務専門 経営専門 伊丹産業振興シニアアドバイザー 登録認証式 第1回　2006.12.25(月） 第2回　2007.9.19（水)