mdp36のプロフィール

asp.netの初心者です。 今まで管理されていた人が休職してしまったので、代わりに修正や加工を少し行っていました。 しかし、以下のファイル内容が全く分かりません。（抜粋です。） 正常に使用しているファイルです。 最後の Session("pointzan")=rs("PointZan") はどこのデータベースから受け取っているのでしょうか？ Select文がどこにも書かれていないので、全くわかりません。 それとも別のファイルなどに飛んで処理しているのでしょうか？ rs("PointZan")を呼び出しているデータベースがどこなのかを知りたいです！！ よろしくお願いいたします。 ---------------------------------------------- If Request.Form("CODE")="" then wID = Trim(Request("CODE")) Set pm = cm.CreateParameter("ID",129,1,13,wID) '(name,Char,Input,Length,Value) cm.Parameters.Append pm cm.CommandText = "UP_HIKI01" cm.CommandType = 4 cm.ActiveConnection = cn Set rs=cm.Execute Else wID = Trim(Request.Form("CODE")) Set pm = cm.CreateParameter("ID",129,1,13,wID) '(name,Char,Input,Length,Value) cm.Parameters.Append pm cm.CommandText = "UP_HIKI01" cm.CommandType = 4 cm.ActiveConnection = cn Set rs=cm.Execute End If Session("code")=rs("Code") Session("pointzan")=rs("PointZan") YVC1=rs("YVC1") If YVC1="" or isNULL(YVC1) Then session("YVC1")="" End If ----------------------------------------------

PHPなどは理解しておりますが、VBに関してはまったく素人で何もわからないものです。 今回、クリップボードの中身を常に監視して、ある文字列が含まれていたらそのまま、それ以外の文字列の場合は空にするアプリが必要になりました。 そこでネットでいろいろ探して次のように作りました。 Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click End End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 'クリップボードの文字列データを取得する Dim ClipBoardValue As IDataObject Dim ClipBoardString As String Dim okng As Boolean Do 'クリップボードのデータを取得() ClipBoardValue = Clipboard.GetDataObject ClipBoardString = ClipBoardValue.GetData(DataFormats.Text).ToString okng = ClipBoardString.Contains("反応あり") If (okng) Then 'クリップボードに文字列をコピーする Clipboard.SetDataObject("反応あり") Else Clipboard.SetDataObject("") End If Loop End Sub End Class 一つのフォームにボタンを一つ設置し、起動したら監視開始、ボタンをクリックしたら終了という形にしています。 動作させると、以下の問題があります。 ・どんな文字をコピーしてもすぐ空になってしまう ・フォームが表示されない ・起動時にクリップボードの中身が空だとエラーが表示される （オブジェクトのインスタンスにはnewを使用しろとかなんとか。。。） 正しい動作をするコードを教えていただけないでしょうか。 よろしくお願い致します。

GPIBで制御をはじめてします。 もともとあるちゃんと動くプログラムを完全に別のフォームにコピーしたところ、青の波線でエラーが出てきました。 まだいじってない(改良してない)のにエラーが出るのは何故でしょうか? エラーの場所は GpAdrsBuf GpAdrsBuf1 Status Excel.Application Excel.Workbook Excel.Worksheet のところに出てきます。 考えられる解決方法を教えてください

お世話になっております。 ご存知の方いらっしゃいましたら、ご教授願えますでしょうか？ Page_Loadイベントについてお尋ねしたいと思います。 フォーム内にいくつかのテキストボックスやを設置し、 テキストボックスの内容をDBへ反映させるための 実行ボタンも設置されていて、これを押した時に ページロードを行いたいのですが、 テキストボックスの内容が変更される度に、 Page_Loadイベントが起こってしまいます。 Page_Loadイベントでは以下のような処理が行われています。 ------------------------------------------------------------- protected void Page_Load(object sender, EventArgs e) { if (IsPostBack == false) { //テキストのReadOnlyの設定等 ......... } } ------------------------------------------------------------- テキストボックスが変更された時には、 必ずPage_Loadイベントが起こるのでしょうか？ また、テキストボックスを変更したときには Page_Loadイベントを起こさない方法はあるのでしょうか？ 初歩的な質問ですみません・・・。 お手数ですがご教授頂きますよう 宜しくお願いいたします。

split関数のデリミタに「"」を使う方法を教えてください。 SplitedData = Split(Data, """) だと当然エラーになってしまうのです。