Send value to code behind sub procedure

[Steven K]

Hello, I am trying to learn how to use Code Behind. Essentially, the
example of Block 1 and Block 2 are the same. The difference is that in
Block 1 I explicitly set the parameter value to "menu_help" . When I open
the menu.aspx page and Call LoadMenu(), the value from the variable
"strMenu" will populate the html table.

However, with Block 2, I am sending the value "menu_help" using Call
LoadMenu("menu_ help"). When I use the statement response.write( strMenu &
"from code behind<br>") in the Code Behind page, the variable information
for "strMenu" will show on the top of the page, but it won't show up in my
table.

Any help with this would be appreciated.

--
Thanks in advance,

Steven

************ Block 1 *************
Public Class DataConnection : Inherits Page

Public Sub LoadMenu()
'Declare Parameters for Stored Procedure
Dim spMenu As OleDb.OleDbData Reader
Dim prmMenu As OleDbParameter
Dim cmdMenu As New OleDb.OleDbComm and("sp_web_Sea rch", cnnSearch)
Dim strRepeat As String
cmdMenu.Command Type = CommandType.Sto redProcedure

'Menu Structure
prmMenu = cmdMenu.Paramet ers.Add("@strPa rm01", OleDbType.VarCh ar) :
prmMenu.Value = "FindWebMen u"
prmMenu = cmdMenu.Paramet ers.Add("@strPa rm02", OleDbType.VarCh ar) :
prmMenu.Value = "menu_help"
spMenu = cmdMenu.Execute Reader()
Do While spMenu.Read
strMenu = strMenu & spMenu("WebMenu Title_ID")
Loop
spMenu.Close() : spMenu = Nothing
response.write( strMenu & "from code behind<br>")
End Sub
End Class
Menu.aspx
------------
<%@ Page Inherits="DataC onnection" src="../../bin/cnnPricing.vb"
Explicit="True" Debug="True"%>

Sub Page_Load(Sende r As Object, E As EventArgs)

If Not IsPostBack
Call LoadMenu()
response.write( strMenu & "hello Steven<br>")
....
End Sub

<div align="left" class="menu">
<table summary="" cellpadding="0" cellspacing="0" class="menu">
<tr><td><div align="left">&n bsp;</div></td></tr>
<tr><td><div align="left"><% = strMenu %></div></td></tr>
</table></div><br><br>
************ Block 2 *************
Public Class DataConnection : Inherits Page

Public Sub LoadMenu(strMen u As String)
'Declare Parameters for Stored Procedure
Dim spMenu As OleDb.OleDbData Reader
Dim prmMenu As OleDbParameter
Dim cmdMenu As New OleDb.OleDbComm and("sp_web_Sea rch", cnnSearch)
Dim strRepeat As String
cmdMenu.Command Type = CommandType.Sto redProcedure

'Menu Structure
prmMenu = cmdMenu.Paramet ers.Add("@strPa rm01", OleDbType.VarCh ar) :
prmMenu.Value = "FindWebMen u"
prmMenu = cmdMenu.Paramet ers.Add("@strPa rm02", OleDbType.VarCh ar) :
prmMenu.Value = "menu_help"
spMenu = cmdMenu.Execute Reader()
Do While spMenu.Read
strMenu = strMenu & spMenu("WebMenu Title_ID")
Loop
spMenu.Close() : spMenu = Nothing
response.write( strMenu & "from code behind<br>")
End Sub
End Class

Menu.aspx
-----------
<%@ Page Inherits="DataC onnection" src="../../bin/cnnPricing.vb"
Explicit="True" Debug="True"%>

Sub Page_Load(Sende r As Object, E As EventArgs)

If Not IsPostBack
Call LoadConnection( )
Call LoadMenu("menu_ help")
....
End Sub

<div align="left" class="menu">
<table summary="" cellpadding="0" cellspacing="0" class="menu">
<tr><td><div align="left">&n bsp;</div></td></tr>
<tr><td><div align="left"><% = strMenu %></div></td></tr>
</table></div><br><br>

[Karl]

I'm a little confused, but the right way to do it is not to use
response.write or <%= %>, but instead to use server controls:

<table summary="" cellpadding="0" cellspacing="0" class="menu">
<tr><td><div align="left">&n bsp;</div></td></tr>
<tr><td><div align="left"><A SP:LITERAL ID="STRMENU" RUNAT="SERVER"
/></div></td></tr>
</table>

and in your codebehind declare that control
Protected strMenu as System.Web.UI.W ebControl.Liter al

and in your LoadMenu() do:
dim str as string
...
while read
str = str & sp_menu("....")
end
strMenu.Text = str

Karl

"Steven K" <sk****@troop.c om> wrote in message
news:Og******** ******@TK2MSFTN GP11.phx.gbl...

Hello, I am trying to learn how to use Code Behind. Essentially, the
example of Block 1 and Block 2 are the same. The difference is that in
Block 1 I explicitly set the parameter value to "menu_help" . When I open
the menu.aspx page and Call LoadMenu(), the value from the variable
"strMenu" will populate the html table.

However, with Block 2, I am sending the value "menu_help" using Call
LoadMenu("menu_ help"). When I use the statement response.write( strMenu &
"from code behind<br>") in the Code Behind page, the variable information
for "strMenu" will show on the top of the page, but it won't show up in my
table.

Any help with this would be appreciated.

--
Thanks in advance,

Steven

************ Block 1 *************
Public Class DataConnection : Inherits Page

Public Sub LoadMenu()
'Declare Parameters for Stored Procedure
Dim spMenu As OleDb.OleDbData Reader
Dim prmMenu As OleDbParameter
Dim cmdMenu As New OleDb.OleDbComm and("sp_web_Sea rch", cnnSearch)
Dim strRepeat As String
cmdMenu.Command Type = CommandType.Sto redProcedure

'Menu Structure
prmMenu = cmdMenu.Paramet ers.Add("@strPa rm01", OleDbType.VarCh ar) :
prmMenu.Value = "FindWebMen u"
prmMenu = cmdMenu.Paramet ers.Add("@strPa rm02", OleDbType.VarCh ar) :
prmMenu.Value = "menu_help"
spMenu = cmdMenu.Execute Reader()
Do While spMenu.Read
strMenu = strMenu & spMenu("WebMenu Title_ID")
Loop
spMenu.Close() : spMenu = Nothing
response.write( strMenu & "from code behind<br>")
End Sub
End Class
Menu.aspx
------------
<%@ Page Inherits="DataC onnection" src="../../bin/cnnPricing.vb"
Explicit="True" Debug="True"%>

Sub Page_Load(Sende r As Object, E As EventArgs)

If Not IsPostBack
Call LoadMenu()
response.write( strMenu & "hello Steven<br>")
...
End Sub

<div align="left" class="menu">
<table summary="" cellpadding="0" cellspacing="0" class="menu">
<tr><td><div align="left">&n bsp;</div></td></tr>
<tr><td><div align="left"><% = strMenu %></div></td></tr>
</table></div><br><br>
************ Block 2 *************
Public Class DataConnection : Inherits Page

Public Sub LoadMenu(strMen u As String)
'Declare Parameters for Stored Procedure
Dim spMenu As OleDb.OleDbData Reader
Dim prmMenu As OleDbParameter
Dim cmdMenu As New OleDb.OleDbComm and("sp_web_Sea rch", cnnSearch)
Dim strRepeat As String
cmdMenu.Command Type = CommandType.Sto redProcedure

'Menu Structure
prmMenu = cmdMenu.Paramet ers.Add("@strPa rm01", OleDbType.VarCh ar) :
prmMenu.Value = "FindWebMen u"
prmMenu = cmdMenu.Paramet ers.Add("@strPa rm02", OleDbType.VarCh ar) :
prmMenu.Value = "menu_help"
spMenu = cmdMenu.Execute Reader()
Do While spMenu.Read
strMenu = strMenu & spMenu("WebMenu Title_ID")
Loop
spMenu.Close() : spMenu = Nothing
response.write( strMenu & "from code behind<br>")
End Sub
End Class

Menu.aspx
-----------
<%@ Page Inherits="DataC onnection" src="../../bin/cnnPricing.vb"
Explicit="True" Debug="True"%>

Sub Page_Load(Sende r As Object, E As EventArgs)

If Not IsPostBack
Call LoadConnection( )
Call LoadMenu("menu_ help")
...
End Sub

<div align="left" class="menu">
<table summary="" cellpadding="0" cellspacing="0" class="menu">
<tr><td><div align="left">&n bsp;</div></td></tr>
<tr><td><div align="left"><% = strMenu %></div></td></tr>
</table></div><br><br>

[Saber]

What about using "server-side" tables?
something like this:
Dim row As TableRow = New TableRow

Dim c As TableCell = New TableCell

c.Text = LoadMenu() 'of course loadmenu() returns a string

row.Cells.Add(c )

Table1.Rows.Add (row)

take a look at:
http://samples.gotdotnet.com/quickst...e1.aspx&font=3

--
Saber S.
http://maghalat.com (Persian)
"Steven K" <sk****@troop.c om> wrote in message
news:Og******** ******@TK2MSFTN GP11.phx.gbl...

Hello, I am trying to learn how to use Code Behind. Essentially, the
example of Block 1 and Block 2 are the same. The difference is that in
Block 1 I explicitly set the parameter value to "menu_help" . When I open
the menu.aspx page and Call LoadMenu(), the value from the variable
"strMenu" will populate the html table.

However, with Block 2, I am sending the value "menu_help" using Call
LoadMenu("menu_ help"). When I use the statement response.write( strMenu &
"from code behind<br>") in the Code Behind page, the variable information
for "strMenu" will show on the top of the page, but it won't show up in my
table.

Any help with this would be appreciated.

--
Thanks in advance,

Steven

************ Block 1 *************
Public Class DataConnection : Inherits Page

Public Sub LoadMenu()
'Declare Parameters for Stored Procedure
Dim spMenu As OleDb.OleDbData Reader
Dim prmMenu As OleDbParameter
Dim cmdMenu As New OleDb.OleDbComm and("sp_web_Sea rch", cnnSearch)
Dim strRepeat As String
cmdMenu.Command Type = CommandType.Sto redProcedure

'Menu Structure
prmMenu = cmdMenu.Paramet ers.Add("@strPa rm01", OleDbType.VarCh ar) :
prmMenu.Value = "FindWebMen u"
prmMenu = cmdMenu.Paramet ers.Add("@strPa rm02", OleDbType.VarCh ar) :
prmMenu.Value = "menu_help"
spMenu = cmdMenu.Execute Reader()
Do While spMenu.Read
strMenu = strMenu & spMenu("WebMenu Title_ID")
Loop
spMenu.Close() : spMenu = Nothing
response.write( strMenu & "from code behind<br>")
End Sub
End Class
Menu.aspx
------------
<%@ Page Inherits="DataC onnection" src="../../bin/cnnPricing.vb"
Explicit="True" Debug="True"%>

Sub Page_Load(Sende r As Object, E As EventArgs)

If Not IsPostBack
Call LoadMenu()
response.write( strMenu & "hello Steven<br>")
...
End Sub

<div align="left" class="menu">
<table summary="" cellpadding="0" cellspacing="0" class="menu">
<tr><td><div align="left">&n bsp;</div></td></tr>
<tr><td><div align="left"><% = strMenu %></div></td></tr>
</table></div><br><br>
************ Block 2 *************
Public Class DataConnection : Inherits Page

Public Sub LoadMenu(strMen u As String)
'Declare Parameters for Stored Procedure
Dim spMenu As OleDb.OleDbData Reader
Dim prmMenu As OleDbParameter
Dim cmdMenu As New OleDb.OleDbComm and("sp_web_Sea rch", cnnSearch)
Dim strRepeat As String
cmdMenu.Command Type = CommandType.Sto redProcedure

'Menu Structure
prmMenu = cmdMenu.Paramet ers.Add("@strPa rm01", OleDbType.VarCh ar) :
prmMenu.Value = "FindWebMen u"
prmMenu = cmdMenu.Paramet ers.Add("@strPa rm02", OleDbType.VarCh ar) :
prmMenu.Value = "menu_help"
spMenu = cmdMenu.Execute Reader()
Do While spMenu.Read
strMenu = strMenu & spMenu("WebMenu Title_ID")
Loop
spMenu.Close() : spMenu = Nothing
response.write( strMenu & "from code behind<br>")
End Sub
End Class

Menu.aspx
-----------
<%@ Page Inherits="DataC onnection" src="../../bin/cnnPricing.vb"
Explicit="True" Debug="True"%>

Sub Page_Load(Sende r As Object, E As EventArgs)

If Not IsPostBack
Call LoadConnection( )
Call LoadMenu("menu_ help")
...
End Sub

<div align="left" class="menu">
<table summary="" cellpadding="0" cellspacing="0" class="menu">
<tr><td><div align="left">&n bsp;</div></td></tr>
<tr><td><div align="left"><% = strMenu %></div></td></tr>
</table></div><br><br>