 |  |  |  |  |  |  |  |
Message Box
Please support our VB.NET advertiser: $4.95 a Month - ASP.NET Web Hosting – Click Here!
 |
Hi All,
Can anyone please help me out here? I have been trying now for about 6 hours on trying to convert this code from vb.net to asp.net
All I want to do is after displaying 20 lines of a schedule for the list box to pause until the OK button is clicked. Then it is to display another 20 lines of the schedule, OK button clicked again, until it is complete.
Any help would be appreciated, very much.
Thanks,
Ken
Can anyone please help me out here? I have been trying now for about 6 hours on trying to convert this code from vb.net to asp.net
VB.NET Syntax (Toggle Plain Text)
Any help would be appreciated, very much.
Thanks,
Ken
•
•
Join Date: Jul 2008
Posts: 65
Reputation: 
Solved Threads: 6
Junior Poster in Training
hi
c this code
MessageBox.aspx
MessageBox.aspx.vb
otherwise c the link
http://www.dnzone.com/ShowDetail.asp?NewsId=861
if ur problem solved plz mask as solved
c this code
MessageBox.aspx
•
•
•
•
<%@ Page Language="vb" AutoEventWireup="false"
Codebehind="MessageBox.aspx.vb" Inherits="ASPMessageBox.MessageBox1"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>MessageBox</title>
<meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0">
<meta name="CODE_LANGUAGE" content="Visual Basic 7.0">
<meta name="vs_defaultClientScript" content="JavaScript">
<meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
</HEAD>
<body MS_POSITIONING="GridLayout">
<form id="Form1" method="post" runat="server">
<asplaceHolder id="PlaceHolder1" runat="server"></asp
<asp:Button id="Button1" style="Z-INDEX: 101; LEFT: 95px; POSITION: absolute; TOP: 99px" runat="server" Text="Click"></asp:Button>
</form>
</body>
</HTML>
•
•
•
•
Public Class MessageBox1
Inherits System.Web.UI.Page
Protected WithEvents PlaceHolder1 As System.Web.UI.WebControls.PlaceHolder
Protected WithEvents Button1 As System.Web.UI.WebControls.Button
Dim newBox As MessageBox = New MessageBox()
#Region " Web Form Designer Generated Code "
'This call is required by the Web Form Designer.
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
End Sub
Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
'CODEGEN: This method call is required by the Web Form Designer
'Do not modify it using the code editor.
InitializeComponent()
End Sub
#End Region
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Put user code to initialize the page here
CheckYesNo()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
newBox.MessageBoxButton = 3
newBox.MessageBoxTop = 50
newBox.MessageBoxLeft = 150
newBox.MessageBoxWidth = 300
newBox.MessageBoxHeight = 150
newBox.MessageBoxButtonWidth = 50
newBox.MessageBoxIDYes = "yesno"
newBox.MessageBoxIDNo = "yesno"
newBox.MessageBoxIDCancel = "yesno"
newBox.MessageBoxButtonYesText = "Yes"
newBox.MessageBoxButtonNoText = "No"
newBox.MessageBoxButtonCancelText = "Cancel"
newBox.MessageBoxTitle = "Dynamic message box."
newBox.MessageBoxMessage = "Do you want to continue?"
newBox.MessageBoxImage = "information.gif"
PlaceHolder1.Controls.Add(newBox)
End Sub
Private Sub CheckYesNo()
If Request.Form("yesno") = "Yes" Then
Response.Write("Button - Yes - Selected")
ElseIf Request.Form("yesno") = "No" Then
Response.Write("Button - No - Selected")
ElseIf Request.Form("yesno") = "Cancel" Then
Response.Write("Button - Cancel - Selected")
End If
End Sub
End Class
http://www.dnzone.com/ShowDetail.asp?NewsId=861
if ur problem solved plz mask as solved
Renukavani,
Thank you very much for your reply, you had to of spent a little time on i, thanks again.
Now I have to try and decipher it.
Thanks,
Ken
Thank you very much for your reply, you had to of spent a little time on i, thanks again.
Now I have to try and decipher it.
Thanks,
Ken
Dim strMessage As String
strMessage = "Connection is Created"
'finishes server processing, returns to client.
Dim strScript As String = "<script language=JavaScript>"
strScript += "alert(""" & strMessage & """);"
strScript += "</script"
If (Not ClientScript.IsStartupScriptRegistered("clientScript")) Then
ClientScript.RegisterClientScriptBlock(Me.GetType(), "clientScript", strScript)
End If
strMessage = "Connection is Created"
'finishes server processing, returns to client.
Dim strScript As String = "<script language=JavaScript>"
strScript += "alert(""" & strMessage & """);"
strScript += "</script"
If (Not ClientScript.IsStartupScriptRegistered("clientScript")) Then
ClientScript.RegisterClientScriptBlock(Me.GetType(), "clientScript", strScript)
End If
|
Similar Threads
- how to print out an array in a message box (Java)
- Message Box Switch Statement (Java)
- I need the Mac OS X message box function (C)
- message box (ASP.NET)
- Time Release Message Box (C)
- download message box's events (ASP)
- repeating the whole program after pressing Yes button in the confirmation message box (Java)
Other Threads in the VB.NET Forum
- Previous Thread: ComboBox.SelectedValueChanged Event keeps firing
- Next Thread: datatype mismatch error
| Thread Tools | Search this Thread |
You need to join our community in order to build your list of favorite forums. You can visit the forum index for a listing of all forums.
Related Forum Features
Latest VB.NET Posts
- Today's Posts
- Unanswered Threads
.net .net2008 2005 2008 access account add application array basic beginner browser button buttons center check click code combo cpu crystalreport cuesent database datagrid datagridview date datetimepicker designer dissertation dissertations dissertationtopic dropdownlist excel exists fade file-dialog filter forms ftp generatetags html images input insert intel listview mobile module monitor mysql net number open output panel passingparameters picturebox picturebox2 port print printing printpreview problem regex reuse right-to-left searchvb.net select settings shutdown socket sqldatbase sqlserver storedprocedure survey tcp temperature textbox timespan transparency trim txttoxmlconverter user usercontol vb vb.net vb.netformclosing()eventpictureboxmessagebox vb2008 vbnet vista visual visualbasic.net visualstudio.net visualstudio2008 web winforms wpf wrapingcode xml year