<%@ Language="VBScript" %> <% Option Explicit %> <% ' TimeOut判定用セッション Session( "cart_timeout" ) = "alive" %> <% '------------------------------------------------------------------------------ ' 関数名　： カテゴリリスト生成関数 ' 機能　　：カテゴリリストのＨＴＭＬを作成する。 ' 呼出形式：MakeCategorySelect(strName) ' 引数　　：strName [in] リストの名前 ' 戻り値　：なし '------------------------------------------------------------------------------ Function MakeCategorySelect(strName) Dim objCon ' コネクション Dim strSQL ' SQLバッファ Dim objRs ' レコードセット Set objCon = Server.CreateObject("ADODB.Connection") objCon.Open(CL_ACCESS_DSN) strSQL = "SELECT * FROM カテゴリ" & _ " ORDER BY カテゴリコード;" Set objRs = objCon.Execute(strSQL) With Response .Write(" " & VbCrLf ) .Write(" " ) .Write("＊未選択＊") Do While objRs.EOF <> True .Write(" " ) .Write(objRs("カテゴリ名") & VbCrLf) objRs.MoveNext Loop .Write(" " & VbCrLf) End With objRs.Close objCon.Close Set objRs = Nothing Set objCon = Nothing End Function %>

	会計業務の受託について 　 　　　　　無料相談 　　　　　　　　↓ レベル１（月額：3,000円〜） *請求書・領収書の整理・管理の代行 　　　　　　　　↓ レベル2（月額：10,000円〜） *会計業務のチェック *会計業務に関して、月次の試算表が正しく作成がされているかのチェックを行う。 *完成された試算表に誤りがないかを確認する。 　　　　　　　　↓ レベル3（月額：20,000円〜） *会計業務全般の指導 �@会計ソフトの選定　�A勘定科目の見直し、初期設定、補助簿作成　�B仕訳入力指導　�C入力チェック �D月次試算表のチェック　�@〜�Dの一連の会計業務の指導を行う。 　　　　　　　　↓ レベル４（月額：20,000円〜　マニュアル作成30,000円〜） *レベル２の指導を行いつつ、徐々にマニュアルを作成する。 　　　　　　　　↓ レベル5（月額30,000円〜） *レベル２にさまざまな財務・会計業務の指導を追加する。 *資金繰り計画、収支計画（先行き管理）、事業計画書作成、財務分析、税理士紹介などの代行・支援 　　　　　　　　↓ レベル6（月額50,000円〜） *間接業務全般をアウトソーシングする。 会計ソフトへの入力代行（社長は経営に専念） 　 ※基本スタンスは、御社の担当者が習得されるまでの顧問指導とさせていただきます。 ※いずれのレベルのおいても、入力作業の費用は含まれておりません。ただし、レベル３以上に関しては、 　仕訳入力代行も承ります。100仕訳まで　8,000円／50仕訳増す毎に3,000円 ※金融機関との交渉、助成金紹介、行政手続、税務調査対応、節税対策、決算業務、企業再編などの様々 　なオプションを今後、構築していく予定です。 　 お問い合わせ、ご相談はこちらまで→Tel. 03-5457-3551　スリフトリンクドットコム�梶@maeda@thriftlink.com