- ベストアンサー
[ASP+SQLsrv] ＳＵＭしたのを表示したい
kumagoro-の回答
"SELECT SUM(GOcust) AS 別名 FROM D_InvoiceDetail" として、 Response.Write rsSUM("別名") としましょう。
関連するQ&A
- ソートの設定
ＡＳＰでアクセス９７を使って品番、納期という順番に表示させたいのですが うまくいきません。 ＳＱＬ文を使って品番順にはならんだのですが、納期がばらばらになってしまいます。どうしたら品番、納期順という並びになるか教えて下さい。 Dim Conn,SQL,RS xxxx=server.mappath("*****.mdb") DBName="Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & xxxx Set Conn = Server.CreateObject("ADODB.Connection") Conn.open DBName SQL = "select * from ******" SQL = SQL & " order by 品番 asc" set RS = Server.CreateObject("ADODB.Recordset") RS.Open SQL, Conn,3,3
- ベストアンサー
- Microsoft ASP
- ＡＳＰでRecordCountが使用できない
Ａｃｃｅｓｓの１００件のデータを１０行づつブラウザに表示したいのですが、rs.PageCount、rsRecordCountなど色々と試しましたが正しい結果が得られず 困っています。 rs.AbsolutePage、Rs.PageSizなども試してみましたが、やはり結果は-1しか返されません。 Set db1=Server.CreateObject("ADODB.Connection") db1.Provider="Microsoft.Jet.OLEDB.4.0" db1.ConnectionString=Server.MapPath("../master.mdb") db1.Mode=1 db1.Open ' Set rs1=Server.CreateObject("ADODB.Recordset") Rs1.Pagesize = 5 ' keyword = "ABC" ' SQL1a = "SELECT top 5 * FROM dbFILE WHERE dbTABEL Like '%" & Keyword & "%'" Set Rs1=db1.Execute(SQL1a) Response.Write rs1.PageCount このようなリストで試しています。よき方法があれば是非 教えて下さい。 最終的にはSQL 7.0に置き換える予定です。 宜しく、お願いします。
- ベストアンサー
- Microsoft ASP
- ASPでORACLEのエラーが発生するのですが、対処方法をお教えください。
Win2000(IIS) + ORACLE8.1.6 でASPを使ったWEBサーバを構築しようとしています。 まず手始めに、単純にデータを登録するような簡単なASPを作成しようとしているのですが、 下記処理が、133行目でエラーになってしまいます。 ※当然の事ながら、ODBC接続の設定は正常に行えていることを確認しております。 (Accessでリンクテーブルを使って、ODBC経由でテーブルにデータを追加できます。) ＜処理内容 (/Oracle/newtoroku.asp の一部)＞ 126行目 Dim Conn,SQL,RS 127行目 DBName="Provider=msdaora;Data Source=xxxxx;User ID=xxxxx;Password=xxxxx" 128行目 Set Conn = Server.CreateObject("ADODB.Connection") 129行目 Conn.open DBName 130行目 SQL = "select * from ＸＸテーブル" 131行目 Set RS = Server.CreateObject("ADODB.Recordset") 132行目 RS.Open SQL, Conn,3,2 133行目 rs.AddNew ＜エラー内容＞ ADODB.Recordset (0x800A0CB3) 現在の Recordset は更新をサポートしていません。 プロバイダか、選択されたロックタイプの限界の可能性があります。 /Oracle/newtoroku.asp, line 133
- 締切済み
- その他(データベース)
- ＡＳＰでRecordCountが使用できない(2)
前回、指示をされた内容ででテストを試みましたがやはり、結果は-1 Set db1=Server.CreateObject("ADODB.Connection") db1.Provider="Microsoft.Jet.OLEDB.4.0" db1.ConnectionString=Server.MapPath("../master.mdb") db1.Mode=1 db1.Open ' Set rs1=Server.CreateObject("ADODB.Recordset") Rs1.Pagesize = 5 ' keyword = "ABC" ' SQL1a = "SELECT top 5 * FROM dbFILE WHERE dbTABEL Like '%" & Keyword & "%'" Set Rs1=db1.Execute(SQL1a) Rs1.CursorType = adOpenKeySet intP = Rs1.RecordCount Response.Write "RecordCount = " & intp & "<BR>" MSDNの説明でRecordCountなど参照しましたが理解不足でしょうか ? 宜しく、お願いします。
- ベストアンサー
- Microsoft ASP
- IIS7.0 と ASP を使ってMDBファイルを参照したい
みなさんこんばんわ。 IIS7.0 と ASP を使ってMDBファイルを参照したいのですが、 エラーが出て、ページを開くことが出来ません。 エラー表示は HTTP500内部サーバーエラー と表示されます。 エラーでとまる部分は以下コードの Point002 と Point003 の間です。 Response.Write "<p>Point001" Set Objconn = Server.CreateObject("ADODB.Connection") Response.Write "<p>Point002" Objconn.open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath(DB_Pass) Response.Write "<p>Point003" StrSQL="select * from " & Table_Name Set Objrs = Server.CreateObject("ADODB.Recordset") Response.Write "<p>Point004" Objrs.Open StrSQL, ObjConn Response.Write "<p>Point005" ODBC を使う方法もあるようですが今回は ODBC を使わないでMDBファイルを参照したいのです。 よろしくお願いします。 環境 OS→Windows Vista Ultimate Access→Access2000 IIS→IIS7.0 使用言語→VBScript
- ベストアンサー
- Microsoft ASP
- ASPでのSQLインジェクション対策
ASPにて、ADOでAccessにアクセスする際にSQLインジェクション対策はどのようにしたらよいでしょうか。 現状は以下の様にしています。（name）は画面から受け取ったパラメータです。 Set aConn = CreateObject("ADODB.Connection") aConn.Provider = "Microsoft.Jet.OLEDB.4.0" aConn.ConnectionString = Server.MapPath("DB.mdb") aConn.open SQL = "SELECT A FROM TBL WHERE NAME = " & name ...... 宜しくお願いします
- 締切済み
- Microsoft ASP
- ASPからVBS実行時の権限
ASPからWscript.Shellを使ってVBSを実行しているのですが、 ASP中のDBオープンには問題はないのですが、test.vbs中でオープンできません LOGファイルは"dbConnection-OK"までになっています。 権限の問題かどうかはわからないのですが、原因は何でしょうか? DBはODBC経由のSQLServerです。 ---------ASP-------------------------------------- <% Dim dbConnection Set dbConnection = CreateObject("ADODB.Connection") dbConnection.Open "testdb" dbConnection.Close Set dbConnection = Nothing '上記OPENに関して問題なし Dim WshShell Set WshShell = CreateObject("Wscript.Shell") WshShell.Run "cscript.exe e:\test.vbs 123", 0, True Set WshShell = Nothing %> <html> <head> <meta http-equiv="Cache-Control" content="no-cache" /> <title>Pipot.to</title> </head> <body> OK </body> </html> ---------test.vbs-------------------------------------- Dim ObjFSO Dim ObjTS Set ObjFSO = CreateObject("Scripting.FileSystemObject") Set ObjTS = ObjFSO.CreateTextFile("e:\log.txt") ObjTS.Write "LOG開始" Dim dbConnection Set dbConnection = CreateObject("ADODB.Connection") ObjTS.Write "dbConnection-OK" dbConnection.Open "testdb" ObjTS.Write "OPEN-OK" dbConnection.Close Set dbConnection = Nothing ObjTS.Close Set ObjTS = Nothing Set ObjFSO = Nothing
- 締切済み
- Microsoft ASP
- ASPでExcelのセルに罫線、色付け
WebサーバーにExcelがセットアップされてないので、 Set rs=Server.CreateObject("ADODB.Recordset") を使用し、Excelオブジェクトを作成後、 接続文字列、SQLを渡して、レコードセットを開きました。 strSQL = "select * from DATA_RANGE" Rs.Open strSQL, Con, 0 '0=adOpenForwardOnly 以下のようにして、Excelに値をセットすることはできたのですが、 rs.Fields(0).Value = "AAA" 罫線や、色をつける方法がわかりません。 どうかご教授ください。
- ベストアンサー
- Microsoft ASP
- ASPソースコードをPHPソースコードに書き換え
下記のASPソースコードをPHPソースコードに書き換えようとしています。 <% Set ObjConn = Server.CreateObject("ADODB.Connection") ObjConn.Open "database_1" Set ObjRS = Server.CreateObject("ADODB.Recordset") ObjRS.Open "food", ObjConn, 3, 3 ObjRS.Filter = "jewelry_0_ID=" & Request.QueryString("No") If ObjRS.EOF Then Response.Write("選択された名称の区分はありません。<br><hr>") Response.Write("<a href=""index.html"">区分選択に戻る</a>") Response.End End If Do While Not ObjRS.EOF Response.Write("<tr><td>") Response.Write(ObjRS.Fields("名称").Value) Response.Write("</td><td>") ObjRS.MoveNext Loop ObjRS.Close ObjConn.Close %> PHPに不慣れであるため、このうち、 Set ObjRS = Server.CreateObject("ADODB.Recordset") ObjRS.Open "jewelry", ObjConn, 3, 3 ObjRS.Filter = "jewelry_0_ID=" & Request.QueryString("No") と、 ObjRS.Close をどのようにすればよいか、分かりません。PHPには、レコードセットを開くという概念はないのでしょうか？下記URIには、見当たりません。 http://php.plus-server.net/ref.uodbc.html
- ベストアンサー
- PHP
- クエリを抽出するスクリプトが分かりません
ＶＢスクリプトで書いています。 アクセスで作ったクエリからさらに、SQL文で抽出条件を指定しレコードセットを作成することは不可能なのでしょうか？ 以下のようにプログラムを書くと、「パラメータが少なすぎます」というエラーになります。 set obj_c = server.createobject("ADODB.Connection") obj_c.open "GoodsDB" sql = "Select * From 注文履歴 where ユーザーID = " & session("id") set obj_r = server.createobject("ADODB.Recordset") obj_r.open sql,obj_c,adOpenKeyset,adLockOptimistic,adCmdtext 「注文履歴」はクエリ名、ユーザーIDはクエリの中にあるフィールドです。 どうぞよろしくお願いします。
- ベストアンサー
- その他（プログラミング・開発）
お礼
完璧ですっ☆勉強不足でした・・・すいません。 有難う御座いました！