C# と VB.NET の質問掲示板

Mr.Tです、こんにちは。

> *.vbs をダブルクリックで実行している (あるいは、WScript.exe や CScript.exe からの実行) なら、
> かわりに *.wsf 経由で実行させてやれば、参照設定が行えます。
> 
> 
> ======   C:\test.vbs   ======
> Option Explicit
> MsgBox adCmdStoredProc
> 
> 
> ======   C:\test.wsf   ======
> <?xml version="1.0" encoding="Shift_JIS"?>
> <?component error="true" debug="true"?>
> <package>
> <job id="sample">
> 
> <!-- ADO 2.8 のタイプライブラリを参照設定 -->
> <reference guid="{2A75196C-D9EB-4129-B803-931327F72D5C}" version="2.8"/>
> 
> <!-- 同じフォルダ上の test.vbs をロードして実行 -->
> <script language="VBScript" src="test.vbs"></script>
> 
> </job>
> </package>
> ========================

なるほど、こういう方法もあるんですね。
http://msdn.microsoft.com/library/ja/default.asp?url=/library/ja/script56/html/wsAdvantagesOfWs.asp
にある通り、test.vbsはIncludeされるから、
<script language="VBScript">
option explicit
MsgBox adCmdStoredProc
</script>
と展開されることと同じと考えてよいということですね。

■No93129 (ゆう さん) に返信

> >取得するレコードの中に「○○店」のデータは含まれるのでしょうか？
>
> はい、含まれています。表の1行目が「店舗名」で、数十店舗のデータが一覧でのっています。

そうであれば、［削除］ボタン（Button または LinkButton と理解してます）の OnClientClick 
プロパティにデータバインド式で「○○店」のデータを設定してやればやりたいことはできると思
います。以下の記事を参考にしてください。

データバインド式
http://surferonwww.info/BlogEngine/post/2010/08/17/Data-bind-method.aspx

具体的には、例えば、SqlDataSource の SelectCommad が以下のようになっていて、その中の name 
が「○○店」に該当するとすると、

SelectCommand="SELECT [id], [name], ... FROM [Table]"

データバインド式 Eval("name") でその行の「○○店」が取得できます。

.aspx 側でスクリプトの文字列を組み立てるのはうまくいかないので、上に紹介した記事に書いた
ように、コードビハインド側で以下のメソッドを追加して（コードは C# です）、それでスクリプ
トの文字列を組み立てて、

protected string Confirmation(string name)
{
    return string.Format("return confirm('{0} を削除して良いですか？');", name);
}

.aspx 側では以下のように OnClientClick プロパティに設定してください。（LinkButton を
使っていると想像していますが、Button でも同じ）

<ItemTemplate>
    ・・・中略・・・
    <asp:LinkButton ID="LinkButton2" runat="server" 
        CausesValidation="False" CommandName="Delete" Text="削除" 
        OnClientClick='<%#Confirmation((string)Eval("name"))%>'
    </asp:LinkButton>
</ItemTemplate>

■No93173 (ゆう さん) に返信

私が No93175 に書いたことでは解決にたどり着けなかったでしょうか？

そもそも質問者さんは VB.NET でコードを書くスキルは十分お持ちなのですか？　そうでない
とすると、説明しても何ともならないかもしれませんが、乗り掛かった舟ということでもう少
し詳しく書いておきます。


まず No93132 で書いた C# の Confirmation メソッドのコードは以下の通りですが、

protected string Confirmation(string name)
{
    return string.Format("return confirm('{0} を削除して良いですか？');", name);
}

それを No93175 で紹介した変換サービスで VB.NET のコードに変換すると、

Protected Function Confirmation(ByVal name As String) As String
    Return String.Format("return confirm('{0} を削除して良いですか？');", name)
End Function

となるので、それをそのまま質問者さんのコードにコピペすれば良いです。

次に、LinkButton の OnClientClick プロパティにデータバインド式で設定する Confirmation 
メソッドですが、その引数は String 型なので Eval("name") を String 型にキャストする必要
があります。

C# のコードでは以下のように (string) を使ってキャストしています。

OnClientClick='<%#Confirmation((string)Eval("name"))%>'

VB.NET ではキャストに CType を使って以下のようにします。

OnClientClick='<%#Confirmation(CType(Eval("name"), String))%>'

ただ、VB.NET の場合はデフォルトで Option Strict Off なのでキャストしなくても、

OnClientClick='<%#Confirmation(Eval("name"))%>'

として VB.NET が勝手に変換してくれるかも（未検証・未確認ですが）。