• ベストアンサー

変数の移送について

 ASPで、Sessionを使って取得した変数を、別のASPファイルに引継ぎ、SQL文を発行したいのですが、移送がうまく行きません。よきアドバイスをお願いします。 ASPファイル1にて Session("Compid") = "B001" ASPファイル2にて strSQL = strSQL & " AND COMPANYID = " & Session("compid") と移送しようとしているのですが、エラーになってしまいます。”や’で囲んでもエラーになります・・・・

質問者が選んだベストアンサー

  • ベストアンサー
  • atsuota
  • ベストアンサー率33% (53/157)
回答No.1

まさかファイル1では"Compid"と大文字なのに、 ファイル2では"compid"と小文字になってるとか、 そんなことではないですよね… もう少し詳しく状況説明があれば (エラー内容とか、もう少し詳しいソースとか) たくさんアドバイスが得られると思いますよ。

ICHI-1
質問者

お礼

回答ありがとうございました。結局これは変数を’でくくっていないため、文字列型エラーでした。 ほんとにこんな初心的なことを書き込みして申し訳ありませんでした。

関連するQ&A

  • ファイルを読み込んで変数へ

    VB初心者です。 ファイルの文字列を読み込んで、変数に格納し、SQL文のテーブル名に指定したいのですが、どうすればよいのでしょうか? テキストから文字列を取得するところまではできたのですが、変数にもって、SQL文に組み込むことができません。実行すると「テーブル名が無効です。」とエラーになります。 どうか、皆様ご教授ください。

  • 変数を使ってのSQL文の書き方(ASP)

    プログラム未経験者です。 aspのSQL文の書き方を教えてください。 (ASP.NETではなく、ASPの方です。) FORMで受けっ取った日付データをstrdayという変数に代入し、 そのstardayを使ってのSQL文の書き方ですが、 以下のような書き方で良いのか分かりません。 例えば、 前の行の「SQL」という同じ変数の直後に連結する書き方や 文字列との連結の書き方です。 また日付をシングルクオーテーションで囲む書き方などです。 strday = Request.Form("StartDay") SQL = "SELECT ・・・,・・・," SQL = SQL & strday & "as startday_date, ・・・," SQL = SQL & " WHERE ('" & strday & "' >= CONVERT(DATETIME, '2012-07-05 00:00:00', 102)) " SQL = SQL & " AND ('" & endday & "' <= CONVERT(DATETIME, '2012-07-06 00:00:00', 102)) " すみません。 宜しくお願いします。

  • サーバー上の全セッション変数を取得する方法

    お世話になります。 ASPでは、各クライアントで使用する変数をセッション変数に保管することができます。 セッション変数は、サーバーのメモリ上で保管されているというそうです。 サーバー上で、現在保持しているセッション変数を、全て取得(表示)したいのですが、 いろいろ調べましたが、わかりませんでした。 ご存知の方アドバイスいただけないでしょうか? よろしくお願いいたします。 ちなみに、クライアントで、 下記を実行すると、そのクライアントのセッション変数は取得できます。 Dim Key For Each Key in Session.Contents Response.Write Key & "=" & Session.Contents(Key) & "<BR>" Next

  • VBとアクセスでSQL文に変数を使いたいのですが

    したいことはレコードの挿入をSQL文で変数を使用して処理したいのですがうまく動作してくれません StrSQL_1 = _ "insert into 行先情報テーブル (社員ID, 行先, 帰社予定時刻, 備考)" & _ "values (7,'(変数1)','(変数2)','(変数3)')" 変数の部分が置き換わりません、いろいろ調べてみたのですがどうもわかりませんvaluesでは変数を使えないのでしょうか? もしそうだとするとどのようにすればレコードを挿入するSQL文で変数を利用できるのかをおしえていただけないでしょうか

  • ASP Session変数名の取得

    ASP(VBScriptにて)現在使用されているセッション変数の一覧を変数名(Key)と共に取得したいです。 どのようにすればできますか?

  • SQL文の連結が、うまくいきません

    いつもお世話になっております。  現在、SQL文生成プログラムを作成しているのですが  エラーメッセージ 「Microsoft OLE DB Provider for SQL Server (0x80040E14)  '.' 付近に不適切な構文があります。」  表示されて、どうしても解決出来ません  ソースを記載しますのでアドバイス頂けないでしょうか?  デバッガーみたいな事をさせてしまい、本当に申し訳ありません  開発者自分一人(ほぼ初めて)で、どうにも進みませんでしたので  お願いいたします。  ※--ASPのデバッグに関して  もう一つお聞きしたいのですが (出来ればこちらの質問も答えてくださると幸いです)  皆さんは、ASPのデバッグをどの様に行っていますか?  VB6.0やVBAの場合は、ソースが不完全やエラーでも  「F8」を押して、ソースの途中まで稼働させて  「現在格納されている変数の中身」等を確認して 割とエラー解決もスムーズに出来ましたが、ASPではそれが出来ないため  難航しています(Line*** と エラーメッセージだけを頼りに)  皆さんはASPの場合、どの様にエラー解消されていますか?  (どうにかして、自分一人でも安定して成果をあげていきたいので)  我流でも結構ですので、是非アドバイスお願いします SQL生成ソース '--SQL生成  strSQL = "select * from STA040, STA500M7"  '--SQL作成(抽出場合分け)  if check = "Day" then   strSQL = strSQL + "where STA500M7.CODE040 = STA040.CODE"  '--期日空白処理   Blank_out J_days_st,N_days_st,M_days_st,J_days_ed,N_days_ed,M_days_ed  '--受注日BetWeen   if J_days_st <> "" and J_days_ed <> "" then    strSQL = strSQL + " and STA500M7.YYMMDD_1 BETWEEN " & J_days_st_sql & " and " & J_days_ed_sql & " "  '--受注日start○,End×   Elseif J_days_st <> "" and J_days_ed = "" then    strSQL = strSQL + " and STA500M7.YYMMDD_1 >= " & J_days_st_sql & " "  '--受注日start×,End○   Elseif J_days_st = "" and J_days_ed <> "" then    strSQL = strSQL + " and STA500M7.YYMMDD_1 <= " & J_days_st_sql & " "  '--受注日start×,End×   Elseif J_days_st = "" and J_days_ed = "" then   End if  '--納期BetWeen   If N_days_st <> "" and N_days_ed <> "" then    strSQL = strSQL + " and STA500M7.YYMMDD_3 BETWEEN " & N_days_st_sql & " and " & N_days_ed_sql & " "  '--受注日start○,End×   Elseif N_days_st <> "" and N_days_ed = "" then    strSQL = strSQL + " and STA500M7.YYMMDD_3 >= " & N_days_st_sql & " "  '--受注日start×,End○   Elseif N_days_st = "" and N_days_ed <> "" then    strSQL = strSQL + " and STA500M7.YYMMDD_3 <= " & N_days_st_sql & " "  '--受注日start×,End×   Elseif N_days_st = "" and N_days_ed = "" then   End if  '--見積日BetWeen   If M_days_st <> "" and M_days_ed <> "" then    strSQL = strSQL + " and STA500M7.YYMMDD_10 BETWEEN " & M_days_st_sql & " and " & M_days_ed_sql & " "  '--見積日start○,End×   Elseif M_days_st <> "" and M_days_ed = "" then    strSQL = strSQL + " and STA500M7.YYMMDD_10 >= " & M_days_st_sql & " "  '--納期start×,End○   Elseif M_days_st = "" and M_days_ed <> "" then    strSQL = strSQL + " and STA500M7.YYMMDD_10 <= " & M_days_st_sql & " "  '--納期start×,End×   Elseif M_days_st = "" and M_days_ed = "" then   End if 'strSQL = strSQL + "order by sta500m7.code ASC" 'strSQL = "select * from STA040,STA500M7 where STA500M7.CODE040 = STA040.CODE and STA500M7.YYMMDD_3 >= " & hiduke & " " 'strSQL = strSQL + " order by sta500m7.code DESC;"    End if    '↓ここがエラーだと表示されます(おそらくSQLが問題かと)    Set objRS = objCon.Execute(strSQL)'レコードセットのオープン  アドバイスお願いいたします

  • 期間集計を日別集計にしたい

    DBはアクセス(.mdb)です。 現在のSQL構文です。。。 strSQL = "SELECT COUNT (*) From DB1 " strSQL = strSQL & "where 条件その1 = '" & Form1.Text1.Text & "' " strSQL = strSQL & "AND 条件その2 = '" & Form1.Text1.Text & "' " strSQL = strSQL & "AND 日時 BETWEEN #" & (開始日時を格納した変数) & "# AND #" & (終了日時を格納した変数) & "#" rs.Open strSQL, cn SU = rs.Fields(0).Value 上記のPGで変数「SU」に、SQL文で設定した条件に該当 するレコード数を代入していますが、これではあくまで 開始日時と終了日時の間に存在するトータルレコード数 、言わば「期間合計」になってしまいますよね。 現在行いたい内容ですが、開始日時と終了日時の間の日 付を1日ごとに分割し、その1日ごとでのレコード数が分 かる、「日別合計」処理をさせるようにしたいのですが。 やっぱり上記のSQL文を根本から考え直さないと出来ない でしょうか?出来れば、なるべく残しつつ、後の方で加工 できればいいなぁと思っているんですが。。。 よろしくお願いします。

  • VB6 String型変数の文字数制限

    VB6 で String型変数に勝手に250文字数制限がかかってしまいます。 解除する方法等ありましたら、ご教授下さい。 変数にはSQL分をいれています。300文字以上のSQL文を挿入するコーディングをしているのですが250文字で切れていまい、実行エラーになります。 変数に対してはとくに制限はかけていません。 環境:VB6 (SP6)  Windows7 ****** コーディング例 ****** Dim SQL As String SQL = SQL & vbLf & "SELECT * " SQL = SQL & vbLf & " FROM TB " SQL = SQL & vbLf & " WHERE ID = 123" SQL = SQL & vbLf & " AND TOKCD = '5478'" SQL = SQL & vbLf & " AND KENSYOKBN = '1'" SQL = SQL & vbLf & " AND SRINM = '1'" SQL = SQL & vbLf & " AND KOBAN = '12345'" SQL = SQL & vbLf & " AND KOSYUCD = '1'" SQL = SQL & vbLf & " AND SIZECD = '13'" SQL = SQL & vbLf & " AND LONGCD = '600'" SQL = SQL & vbLf & " AND GHONSU = '360'" SQL = SQL & vbLf & " AND KAINM1 = 'あいうえおかきくけこ'" SQL = SQL & vbLf & " AND GENNM1 = 'たちつてとなにぬねの'"

  • 変数に入った値を追加したい

    Access97を使用しています。SQLで変数に入った値を追加したいのです。 Dim strSQL, NO3, NO2 As String Dim i As Integer Dim db As DATABASE Dim SN As Variant If (C_Flag = 0) Then SN = 0 Else SN = 1 End If strSQL = "INSERT INTO 連続印刷 (Nフラグ" strSQL = strSQL & ") VALUES (" strSQL = strSQL & "', 'SN'" strSQL = strSQL & ")" Set db = CurrentDb() db.Execute strSQL Set db = Nothing End Sub 上記のようにすると、"SN"のデータが入ります。 'SN'をSNのようにすると、パラメータが少なすぎますと出てきます。 どうすれば、上記 0や1の値を取得することができるのでしょうか?

  • ASP VBS global.asa Session_OnStart内

    ASP VBS global.asa Session_OnStart内でサーバーの環境変数取得 教えてください。global.asa内で環境変数って取得できるのでしょうか? 今までglobal.asaファイル内で直接書いていた文言を、環境変数から取得する、 というプログラム修正をしなければならなくなりました。 まず、VBSファイルを作成して、環境変数を取得することはできました。 その内容でそのままglobal.asaに記述すると、おそらく、環境変数が正しく取得できません。 このおそらくというのは、エラーが表示されないのです。 ただ、取得できていないので、その後の処理でエラーとなります。 環境は、 IIS 6 Windows2003server です。 いろいろ調べているのですが、いい回答が見つからず。 そもそも、global.asa内で環境変数を取得できるのかも分からず。 お願いします。

専門家に質問してみよう