出来るのだASP Q&A掲示板(過去LOG)
訪問数 52046
昨日 889
今日 776 【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。 |
![]() ![]() ![]() ![]() ![]() |
[5198] Re:ボタンが押されたらDB処理したい |
投稿者:YasNet(管理人)さん 2005/08/22 12:45:57 |
こんにちは 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 |