View Single Post
  #2 (permalink)  
Old May 19th, 2004, 01:40 AM
leion leion is offline
Authorized User
 
Join Date: Mar 2004
Location: Rawang, Selangor, Malaysia.
Posts: 47
Thanks: 0
Thanked 0 Times in 0 Posts
Default

Hi Mustafa,
There are few ways to solve your problem.

1) Use session

Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
lblMessage.Text = "Press a button !"
'To get back WorkExperience last result
WorkExperience = session.Contents("WE")
'To avoid clear session
session.Contents.Remove("WE")
WorkExperience +=" Hello !"
End Sub

Sub SubmitBtn_AddValue(Sender as Object, E as EventArgs)
WorkExperience + = "IT Officer"
WorkExperience + = "01,"
WorkExperience + = "2002,"
WorkExperience + = "02,"
WorkExperience + = "2002,"
WorkExperience + = "Hello2,"
WorkExperience + = "+"
'To store value into session
session.Contents("WE") = WorkExperience
lblMessage.Text= WorkExperience
End Sub


2) Use label.text

Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
if lblMessage.text = ""
    lblMessage.Text = "Press a button !"
else
WorkExperience = lblMessage.text
end if
WorkExperience +=" Hello !"
End Sub

Sub SubmitBtn_AddValue(Sender as Object, E as EventArgs)
WorkExperience + = "IT Officer"
WorkExperience + = "01,"
WorkExperience + = "2002,"
WorkExperience + = "02,"
WorkExperience + = "2002,"
WorkExperience + = "Hello2,"
WorkExperience + = "+"
lblMessage.Text= WorkExperience
End Sub


Hopefully this will help you

Reply With Quote