CSDN博客

img xiaoK

在服务器用代码实现弹出对话框

发表于2004/12/30 20:02:00  870人阅读

分类: 关于.Net

 Private Sub cscript(ByVal key As String, ByVal meg As String)
        Dim scriptFunction As New StringBuilder
        scriptFunction.Append("<script language= vbscript>")
        scriptFunction.Append("msgbox(""" & meg & """)")
        scriptFunction.Append("</script>")
        RegisterStartupScript(key, scriptFunction.ToString())
    End Sub

0 0

相关博文

我的热门文章

img
取 消
img即使是一小步
也想与你分享
打开
img