Public Shared Sub CreateMessageAlert(ByVal strMessage As String) Dim guidKey As Guid = Guid.NewGuid() Dim pg As Page = HttpContext.Current.Handler Dim strScript As String = “alert(‘” & strMessage & “‘);” pg.ClientScript.RegisterStartupScript(pg.GetType(), guidKey.ToString(), strScript, True) End Sub
Kategori belirtilmemiş | 0 Yorum | 04.03.2010 06:24:19 Etiketler: javascript