==ASP==
■ このスレッドは過去ログ倉庫に格納されています
0001名無しさん＠お腹いっぱい。
NGNG0582579じゃないが
02/05/29 01:20ID:B4X/NYJTこれでいいじゃねーか。問題ある？
0583nobodyさん
02/05/29 01:31ID:YNpAKpy+1.response.write
2.Response.Write
3.RESPONSE.WRITE
この場合、VBを基本として ２がお勧めと言うことでよろしい？
ＨＴＭＬタグの基本はどうなんだろう・・・
0584582
02/05/29 02:19ID:B4X/NYJTJScriptなら1
PerlScript、RubyScriptは知らん。
ちなみにXHTMLでは要素名、属性名ともに全て小文字。
0585nobodyさん
02/05/29 13:34ID:9L2EUYXB別枠から履歴として表示させる処理を書いたのですが、
新しい情報を入力すると以前に登録してあるものも一緒に表示されてしまいます。以下がソースです。（幾分か省略してます)
どこを直したら抜け出せるのでしょうか？どうかご教授お願いします。
<% Do While Not rsTemp.EOF
strSlipDate = FormatDateEx(rsTemp.Fields("slipdate").Value)
curSubTotal = rsTemp.Fields("amount").Value
curTotalTax = rsTemp.Fields("tax").Value
curTotal = rsTemp.Fields("total").Value
strRemark = rsTemp.Fields("remark").Value
Select Case ValEx(rsTemp.Fields("orderflag").Value)
Case 1
strOrderNote = "未処理"
Case 2
strOrderNote = "処理済"
End Select
strSQL = "SELECT " & _
"saldetails.rownumber,saldetails.itemcode,saldetails.quantity," & _
"items.name1 as ItemName,saldetails.totalprice,saldetails.tax " & _
"FROM sales,saldetails,items,customers " & _
"WHERE saldetails.itemcode=items.code " & _
"AND sales.id=saldetails.slipid " & _
"AND sales.cuscode=customers.code AND sales.orderflag > 0 " & _
"AND customers.code='" & strUserCode & "' " & _
"ORDER BY sales.id,saldetails.rownumber"
'Response.Write strSQL
Set rsTemp2 = cnMain.Execute(strSQL)%>
<% Do While Not rsTemp2.EOF
intRowNumber = ValEx(rsTemp2.Fields("rownumber").Value) + 1
strItemName = rsTemp2.Fields("ItemName").Value
curQuantity = rsTemp2.Fields("quantity").Value
curAmount = rsTemp2.Fields("totalprice").Value
curTax = rsTemp2.Fields("tax").Value%>
<% rsTemp2.MoveNext
Loop %>
0586>>585
02/05/29 15:53ID:???更新処理はうまくいってるの？
0587585
02/05/29 16:56ID:u9ftNcNyそうですね、すみません。例えばこんな感じです。
5月1日 かぼちゃ
5月1日 かぼちゃ
5月2日 りんご
5月1日 かぼちゃ
5月2日 りんご
5月5日 にんじん
このように、過去に登録されたものまで逐一表示されてしまうのです。
更新処理はどうにかなってます。
0588nobodyさん
02/05/29 18:38ID:3eHWTyEZなんか１行目のDoに対応するLoopが無いし、よくわからんが
要はレコードセットrsTemp2の最後のレコードだけを表示したいということ？
0589585
02/05/29 21:07ID:QFC4cJ5qそーです。そーなんです。最後のレコードだけを表示できるように
したいんです。
0590nobodyさん
02/05/29 21:32ID:???select top 1 ・・・・order by 日付 desc とか
movelastするとかあんだろ
0591nobodyさん
02/05/30 15:10ID:???ASPもhtmlも初心者ですので！！！
0592nobodyさん
02/05/30 19:57ID:k/+zDdbvSQLでORDER BYを降順にソートして、
結果の一番最初のレコードだけを表示するのが
一番簡単なやり方だね。
0593585
02/05/30 20:36ID:HUmcKNG3どうもありがとうございます。頑張ってみます。
あなた方に神のご加護がありますように。
0595 ◆IUSR/9/M
02/05/31 16:26ID:qILvQPTP問題は貼り付けたソースの外にあるように思われ。
0596585
02/05/31 19:58ID:1jAhHyvSええ？HTMLの部分がおかしいのですかね？
0597nobodyさん
02/05/31 20:13ID:E1t00VZjなにか、うまい方法があったら教えて欲しいのですが。
0599nobodyさん
02/05/31 21:32ID:???0600[email protected]
02/05/31 21:40ID:???「高性能ビデオスタビライザー」です↓
http://user.auctions.yahoo.co.jp/jp/user/NEO_UURONNTYA
店頭販売価格は、13900 円なんですが、
今回だけ、破格の 7100 円に設定して
おります。
購入希望の方は、名前の所にも書いて
ある、[email protected] 迄、
メールを下さい。
不安な方は、落札をして頂いても
構いません。
0601597
02/06/01 05:07ID:q9yVT/51VBScriptでクラスっぽいことができるんです。
class MyClass
(statement)
end class
set newObj=new MyClass
newObj.Method()
みたいな。でも、派生クラスの作り方がわからないのです。VBみたく
インターフェースのみを定義したクラスオブジェクトを作って、実装
してる部分は別にしたりすれば、真似事みたいなことはできるかなあ
と思ったのですが、うまく整理できなくて。
0602 ◆IUSR/9/M
02/06/01 08:30ID:Hv+66CTl一番外っ側のDoの処理がおかしいんぢゃねーの？
対応するLoopが無いが。
内っ側のループの処理は効率は悪いが間違っちゃーいないはず。
0603nobodyさん
02/06/01 09:54ID:Bs3ThbmVそこまでは、前の書き込みでも話が出てるが、
今のところ情報は、そこまでって感じ。
ところで、ＶＢでのインターフェースって、どんな形になるの？
（ちょっと興味アリ）
ただ、VB、ASPでクラス化するならJavaに乗り換えた方が
よっぽど便利で簡単だという罠も。
0604 ◆IUSR/9/M
02/06/01 10:29ID:Hv+66CTlC#も有りかも。
せっかく会社だまくらかしてVS.NET Enterprise Developer買わしたのに
いじる暇が無い．．．
とか言いつつも仕事中に書き込んでる自分が欝。
0605597
02/06/01 23:16ID:q9yVT/51前の書き込みもおぼえとります。俺が答えたと思うので。
それはそうと、MSDNライブラリを読んでてＶＢでは多態はあるが、継承は
ない。多態はインターフェースで実装される、という詐欺みたいなことが
書いてあって萎えました。・・・。・・・。気を取り直して・・・。
あまりスマートではないですが、こういうのを考えました。まだ
動かしてみてないですが、どうでしょうね。。。
*******基底クラス*******
Class BaseClass
Public Sub BaseMethod()
（statement）
End Sub
End Class
*******派生クラス*******
Class SubClass
Private Sub Class_Initialize()
Set obj = new BaseClass
End Sub
Public Sub BaseMethod()
call obj.BaseMethod()
End Sub
Private Sub Class_Tarminate()
set obj = Nothing
End Sub
End Class
0606597
02/06/01 23:18ID:???0607nobodyさん
02/06/02 04:12ID:XL2zSSQ3設計の中で、それでＯＫなら、ＯＫじゃないでしょうか。
ただ、クラスの中で、別のオブジェクト宣言して、そいつに処理投げちゃうのって、
委譲って言うんでしたよねぇ。OOP的には、継承とは区分けされていたと思います。
ただ、VB(VBS)では、ポリモルフィズムが使えない以上、継承のメリットも薄いので、
機能の階層関係を作りたいときなどには、委譲の形で全然ＯＫだと思います。
0608nobodyさん
02/06/02 23:32ID:qoXjUYueXPProにIISいれてASPをやろうとしているのですが
どうにも表示できません･･･というか
時間がかかってどうもビジー状態になっているかのように思われます。
なぜこの様な現象が起こるのか、解決策を教えてください。
私自身が調べた限りではNTFSでないと駄目だとか
そういったことは直したのですがそれでも解決されないので･･･。
よろしくお願いします。
0610nobodyさん
02/06/03 00:08ID:???FAT32 XPProにIIS入れてますがが何か?
大体、状況を正確に伝えてない。
ビジー状態ってなんですか？
エラーが出て強制終了しちゃうということですか？
ＩＩＳの管理ツールで、停止、開始が自由にできないのですか？
そもそも、URLは何を入力したですか？
HTMLも表示できないですか？
・・・・と、以上、基本的なチェックリスト。
0611nobodyさん
02/06/03 02:43ID:uY+LB1P8どこで調べたのか知りたい。
609さんと同様、起動してないに一票。
0612597
02/06/03 04:58ID:2ezI2JRoなるほど、これは委譲というですか。継承ではないのはわかってましたが
なんと呼ぶかわからず、泥臭い方法と呼んでしまいましたが（汗。
勉強になりましたｍ（＿＿）ｍ
0613597
02/06/03 05:03ID:2ezI2JRoこの辺を読んだんじゃないでしょうか？
http://www.microsoft.com/japan/developer/library/jpiis/iishelp/iis/core/iisckl.htm
0614nobodyさん
02/06/03 22:50ID:???0615nobodyさん
02/06/03 23:59ID:???VB6.0ではインターフェースの継承は、Implementsキーワードでできます。VBSは知らない。
ただASPでOOを使うのはお勧めできない、InterDevは他ファイルのIntelliSenseも利かないし。
Classが使えるようになったのは、IIS5.0あたりからだっけかな。
OOが分かるなら、JavaかASP.NETを使うのがよろしい。
0616597
02/06/04 04:21ID:mrpGDV3U> InterDevは他ファイルのIntelliSenseも利かない
実はVS.netで改善されてたらいいなーとちょっぴり期待してたのですが、
やっぱりダメでした（笑）
どの言語を使うのかは、俺が決めれる範疇ではないのでしかたないです。
それに、Javaにしても.NETにしても、今回は超短納期なので、勉強しなが
ら進める余裕がないので・・・。今回のが終わったら、進言してみるよ。
さんくすこ。
0617608
02/06/04 07:09ID:Du/KCssN皆さんの言われてるIIS起動はしてます。
大体わかってきたことなのですが
ASPのPGに間違いがあった場合に
ロードができないままロードが終わってしまっているようです。
しかし私が求めいるものは間違いがあったら
「ライン○行目が違ってます」という
あのMSが出しているページがほしいのです。
以前は出ていたのですが最近になって出ません。
しかもIISの調子がおかしいのかと思い、
停止させようとすると反応がないので止められませんって
言われてしまいます。
0618 ◆IUSR/9/M
02/06/04 11:07ID:S2Yze7Jiイベントログには何も残ってないの？
ごちゃごちゃやるよりバッサリと再インスコしたほうがいいんじゃない？
0619nobodyさん
02/06/04 20:44ID:???それなりに答えて貰いたいなら、きちんと状況書けよ
>>617みたいなつまらん報告なんてするな
0620nobodyさん
02/06/05 12:52ID:???0621608
02/06/05 19:27ID:SO9jodEg再インストは何度もしましたがだめですね。
状況は変わらなかったです。
無限ループはしていなかったです。
会社でやった場合は宣言が足りなかっただけでした。
今日はそのソースを持ち帰り、自宅での実験したかったのですが
持ち帰りを忘れてました････^^;
0622nobodyさん
02/06/05 20:21ID:???あのね、よいですか、あなたのやってることは、初めて会う人に
「私の誕生日何日だ？」と聞いてるようなもんですよ。
「10月25日」「はずれ」。あなたはただ、「はずれ」と言うだけで
ヒントを何も出さない。それに対して回答者は365の選択肢を検討
しなければならない。どちらがしんどいかわかりますよね。
もし問題をダシにしてコミュニケーションを取りたいだけなら、
マ板へどうぞ。
何が言いたいのかｻﾊﾟｰﾘ
0625nobodyさん
02/06/06 08:53ID:???ふつー作る前に仕様書作るもんだけどな。
無ければ自分で作ればいい。要求スペックにもよるがそんなに難しくは無い。
perlあたりでサクサク作ってみては？
0626nobodyさん
02/06/06 08:57ID:???VBScriptは区別しないがJavaScript(JScript)は区別する。
VBScriptのノリで書くとJScriptでエラーとなる。
よってヘルプに記されている通りに書いたほうがよい。
とは言え、言語仕様としては大文字小文字区別しないので
あまり神経質に考えない。
0627nobodyさん
02/06/06 09:02ID:???販売元にお聞きしてはいかがでしょうか。
正規ユーザなら販売元に電話して聞いたほうが解決が早いこともありますよ。
0628621
02/06/06 23:43ID:HZspSnk8失礼します。
0629nobodyさん
02/06/07 10:37ID:lJP0VltF0630anonymous
02/06/07 23:13ID:6y0JL1CY超古典的だよ。やってて楽しいの?
0633anonymous
02/06/08 00:01ID:sAeg6oVCおまえは、もっとタイプの練習しな > 632
0634nobodyさん
02/06/08 08:26ID:ImGHPXP2オブジェクト指向に特化した言語仕様というのであれば、
クラスとかは一応使えますってレベルでしょうか。
しかし、それ以前に、自分がオブジェクト指向でプログラムを
設計できることが先かなぁとか思う。
何も、継承やポリモルフィズムに特化したOOP言語の「機能」を使うことが
オブジェクト指向じゃないよなぁって思うんだけどね。
かと言って、ASPがお手軽ツールが故の限界は否定されることではありませぬ。
生産性が高く、よく出来てるなぁとは思いますけどね。
0635nobodyさん
02/06/08 08:36ID:???ＶＢとかでＣＯＭ作ってそれを呼べばいいだけの話だし。
もちろんそこまで高度なことしなくても、634の言う通り「お手軽」ツールではあるけどな。
0637nobodyさん
02/06/09 03:00ID:???0639nobodyさん
02/06/10 00:07ID:???それは「暗黙の了解」ってやつでしょう。
言葉の意味が間違って使われることなんてよくあることだし、それが一般化してしまえば、「間違った意味」ではなくなる。
ＡＳＰのプログラム＝ＡＳＰで動くＶＢＳｃｒｉｐｔやＪＳｃｒｉｐｔのプログラム、でいいんじゃないかな。
0640637
02/06/10 02:18ID:???0641名無しさん＠そうだドライブへ行こう
02/06/10 10:54ID:i5c2WU+NランダムID作成
DB Open
IDがダブってないかチェック
存在しなければ、登録
存在したら、k = k + 1
Next
って、してるんだけど、ダブったID分だけ、少なくなる
なんで？
何が少なくなるのかわからん。
0643nobodyさん
02/06/10 21:13ID:pExJBB0bOPEN何回するんだ
ForNext使うような処理か
ランダムにする必要があるのか
0644nobodyさん
02/06/11 02:01ID:???For Next の To の部分(k)をループの中でいじるなよ。
Do Loop にして If で Exit Do せよ。
0645即答お願い！
02/06/11 05:46ID:SR7p/BHHWindowsプログラム経験は０で、ほとんどがUNIXでの開発でした。
スキルはPerl,PHP,PostgreSQL,MySQLって感じなんだけど、大丈夫かな？
ASPって簡単？
0646help me!!
02/06/11 06:01ID:Eq2bnklk0647nobodyさん
02/06/11 06:20ID:81ebp4mZソースの部分ぜんぜん見てなんだ．．．
コネクション何回も開いてるし、Forの中でイランとこいじってるし。
一番大きいIDを拾って、＋１するんじゃだめなんか？
それかAccessならオートナンバーにするとか。
0650649 ◆IUSR/9/M
02/06/11 08:49ID:???0651641
02/06/11 10:03ID:o4wPDLWo一応、書いてなかったけどコネクションは閉じてるんです。
でも、ForNextの数字をいじったのがいけないみたいですね・・・。
炒ってきます
0652 ◆IUSR/9/M
02/06/11 10:10ID:gBpO67K9別に叩く気は無かったが。
それに閉じてないのが問題じゃなくて．．．
ふつうはコネクション開くのはForループの前でいいっしょ。
で、ループから抜けたら閉じると。
でもこの処理ではあまりに効率悪いです。
649で書いたこと検討汁。
VBSでASPはかなりお手軽。
PHP、Perlが出来れば楽勝と思われ。
JScriptのほうは知らん。
それにしてもこのスレの人ってASP関係以外でどんなスキル持っているの？
0654教えてください
02/06/11 10:46ID:???<div align="center"><a href="kekka.asp?mode=dlt&key=<%=RS("T_SEQ")%>" onClick="Delete_OnClick()">削除</a></div>
------------------------------------------------------------
と書いて
削除押したら自分自身(kekka.asp)を呼び出して
確認メッセージを以下のVBScriptで確認します。
------------------------------------------------------------
Function Delete_OnClick()
Dlt_OnClick= False
lngRC = MsgBox(""本当に 削除してもいいですか？" ,vbOKCANCEL,"削除フォーム")
If lngRC = vbOK Then
MsgBox "ok"
Dlt_OnClick= True
else
Dlt_OnClick= False
Exit Function
end if
End Function
------------------------------------------------------------
流れは
「削除」のリンククリック→確認メッセージ表示→
ＯＫならSQL実行、ｷｬﾝｾﾙならなにもしない
といったようなことしたいのですが上のやり方で
確認メッセージまでは出せたのですが
Request.QueryString("mode") = "dlt"ならSQL実行
というので判断しようとしたんですが
できません。
どうしたらいいでしょうか？
何かいい方法があればよろしくお願いします。
0655641
02/06/11 12:07ID:o4wPDLWoそーですね。実際効率悪いです（ｵ
やっぱり、炒ってきます
0657nobodyさん
02/06/11 19:16ID:Lbf3EwoP[アプリケーションの設定|アプリケーション名]
の所のアプリケーションって一体何を意味しているのですか？
あと、実行アクセス権とアプリケーション保護ってのも。
意味がわかりません。
あそこに"アプリケーション"が作成されてなくてもASPは動作するような気がします。
どうしてでしょうか？
0658nobodyさん
02/06/11 21:11ID:thQNmmcOアプリケーション＝global.asa って何か調べてみなされ
0659nobodyさん
02/06/11 21:48ID:thQNmmcOFunction Delete_OnClick()
Dlt_OnClick= False
lngRC = MsgBox(""本当に 削除してもいいですか？" ,vbOKCANCEL,"削除フォーム")
If lngRC = vbOK Then
MsgBox "ok"
Dlt_OnClick= True
else
Dlt_OnClick= False
Exit Function
end if
End Function
Function は Delete_OnClick() なんだろ
なのに戻りがDlt_OnClick とはどういうことだい？
あと、Exit Functionは必要かい？
0660nobodyさん
02/06/12 18:09ID:0p8gfwGx0663nobodyさん
02/06/12 21:11ID:jRTSFpK+ちなみに俺は秀丸
0664nobodyさん
02/06/12 23:37ID:???0666659
02/06/13 20:31ID:GAxJ69kX<a href="kekka.asp?mode=dlt&key=<%=RS("T_SEQ")%>" onClick="Delete_OnClick()">削除</a>
ところで、こんな書きかたってできるのか？俺が知らないだけか・・・
メッセージが出るなら
If lngRC = vbOK Then
MsgBox "ok"
"Delete Sql " ←ここにSQL書けばいいんじゃないの？
Dlt_OnClick= True
else
Dlt_OnClick= False
Exit Function
それか
<a href="kekka.asp?mode=dlt&key=<%=RS("T_SEQ")%>">削除</a>
これでkekka.aspのあたまで確認メッセージだして
Noだったらresponse.redirectで戻ってくればいいんじゃない？
0667nobodyさん
02/06/13 22:03ID:???emacsおすすめ（藁
0668nobodyさん
02/06/13 22:08ID:???それじゃいかんよ。確認ダイアログの表示はクライアントで動いて
いるんだから。次のようにしないとダメだ。
<%
Dim SCRIPTNAME
SCRIPTNAME = Request.ServerVariables.Item("SCRIPT_NAME")
Select Case Request.QueryString.Item("mode")
Case "del"
call DeleteSQL()
Case Else
call WriteDoc()
End Select
Sub DeleteSQL()
'ここでレコードを削除する処理を書く。
response.Write ("削除しますた")
End Sub
〜〜〜続く〜〜〜
0669nobodyさん
02/06/13 22:09ID:???Sub WriteDoc()
Dim DelKey
'ここでDBに接続して削除するレコードのキー
'を取得する処理を書く。
DelKey = RS("T_SEQ")
'---------Here Documet Start------------%>
<html>
<head>
<script language="JavaScript">
<!--
function Kakunin(){
res = confirm("本当に削除しますよ？");
if (res == true)
window.location.href="<%= SCRIPTNAME %>?mode=del&key=<%= DelKey %>";
}
//-->
</script>
</head>
<body>
<a href="#" onClick="Kakunin();">削除</a>
</body>
</html>
<%'------Here Document End ------------
End Sub
%>
0670nobodyさん
02/06/13 22:11ID:???0671nobodyさん
02/06/13 22:12ID:nCrZQ6cdどう判定したらいいですか？
「1000」とかをはじきたいのですが。
よろしくお願いします。
0672659
02/06/13 22:57ID:GAxJ69kXっていうか・・・ASPスレだよなここ・・・・↑これはどうよ
0674nobodyさん
02/06/14 00:46ID:qFND6rQ7どっかでみたような質問だな（ｗ
そしてどっかで回答したぞ（ｗ
0675nobodyさん
02/06/14 00:48ID:qFND6rQ7これもどっかで回答したなー（ｗ
俺のじゃ動かなかったのかYOヽ(`Д´)ノ
0676nobodyさん
02/06/14 00:53ID:qFND6rQ7RegExp使うヨロシ
0677nobodyさん
02/06/14 08:12ID:???適当にこんなのでいいんじゃないの？
Function TimeChk(str)
str = Replace(str,"：",":")
TimeChk = IsDate(str)
End Function
0678 ◆IUSR/9/M
02/06/14 15:28ID:1+7Gqjw1この辺のことよくわかってないんだが、開いたレコードセットの数だけ
コネクション勝手に張られるって事？
ってことは
Sub Hirakimakuri
Conn.Open strConnection
'何かの処理
Conn.Close
'（★★↑ここは実際にはまだ閉じてないよーん★★）
Conn.Open strConnection
'（★★↑実わ始めっからひらいてるよーん★★）
'何かの処理
Conn.Close
End Sub
ていうことが起こってるの？
この辺のことかなり疎いんだわ。
ちょっと勉強してみるわ。
0681nobodyさん
02/06/15 23:18ID:???IIS+ASP+SQLServerはどうなの？
なんかええことある？
■ このスレッドは過去ログ倉庫に格納されています