出来るのだASP Q&A掲示板(過去LOG)
訪問数 52046
昨日 889
今日 776 【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。 |
![]() ![]() ![]() ![]() ![]() |
[5199] Re:ボタンが押されたらDB処理したい |
投稿者:もりもりさん 2005/08/22 13:17:27 |
管理人さん、ありがとうございます。 クライアント処理とサーバー処理と聞いて調べました。 スクリプトはクライアント側とサーバー側で動作するという ことに気が付いていませんでした。 <SCRIPT LANGUAGE="VBScript" EVENT = "onClick" FOR = "Button" RUNAT = "Server"> このように「RUNAT = "Server"」を追加し、 サーバー側で動作するように 修正したところ、正常に動作しました。 あっ、<!-- -->は不要でした。 非常に助かりました!本当にありがとうございます!! また教えて下さい。 > こんにちは YasNet(管理人)です。 > > 以下は、クライアント処理とサーバー処理を考えると理解できると思うのですが > 混同しておられないでしょうか? > > エラーの箇所は、クライアントで動作していませんか? > > あとエラーが発生と有りますが、どんなエラーが出たのでしょうか > > 出先で時間が無いので、冷たい文面で失礼します。 > > それでは 失礼致します。 > > > 初めて投稿するASP歴1ヶ月程度の者です、お願いします。 > > > > 「ボタンが押されたらDB処理をする」ということを実現したいのですが > > うまくいきません。ソースは以下の通りです。 > > > > <%@ LANGUAGE=vbscript LCID=1041 %> > > <% Option Explicit %> > > <!--#INCLUDE FILE="TestFunc.asp"--> > > > > <HTML> > > <BODY> > > 省略 > > </BODY> > > </HTML> > > <SCRIPT LANGUAGE="VBScript" EVENT = "onClick" FOR = "Button"> > > <!-- > > Dim sqlTxt,rs > > > > sqlTxt = "select * from 在庫 " > > set rs = RSOpen(sqlTxt) ※ここでエラーになります > > --> > > </SCRIPT> > > > > +++++++++以下はTestFunc.aspにある関数++++++++ > > Function RSOpen(mySQL) > > Dim rs > > Set rs = Server.CreateObject("ADODB.Recordset") > > > > rs.open mySQL,DBConn(0) > > Set RSOpen = rs > > End Function > > > > Function DBConn(num) > > Dim objConn2,strConn > > > > strConn = "Provider=SQLOLEDB.1;Password=sa;Persist Security Info=True;User ID=sa;" & _ > > "Initial Catalog=" & "Test" & ";Data Source=" & "testserver" > > > > Set objConn2 = Server.CreateObject ("ADODB.Connection") > > objConn2.ConnectionString = strConn > > objConn2.Open > > Set DBConn2 = objConn2 > > > > End Function > > > > BODY内部に<%%>でset rs = RSOpen(sqlTxt)を書き込めば > > 問題なく動作しますが、VBScruptすると駄目みたいです。 > > ボタンが押されたらリセットするというような機能を実現したく、 > > onClickをやってみたのですが…。 > > 教えて下さい、お願いします。 |
![]() ![]() |
![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() |
TreeBBS For ASP V.0.1.3 |