Promo Code

[captain15]

I am trying to add a promo code to my website that will allow the input of a promo code and give the client an additional 5% discount. This is the code that I have:

Dim Promo as String, formval
Promo = "BNOV21"
formval = request.form("discount")

lblTotal.Text = GetItemTotal()
If (formval = Promo) and (session("discount") = "") Then
GetItemTotal() = GetItemTotal() - (GetItemTotal() * .05)
session("discount") = GetItemTotal()
end if
lblTotal0.Text = RetailShip
lblTotal1.Text = RetailShip + GetItemTotal()
Itemlbl.Text = RetailShip


If session("discount") <> then GetItemTotal() = session("discount")

If objDT.Rows.Count = 0 Then

lblTotal0.Text = "0.00"
lblTotal1.Text = "0.00"

This is the error I get:

Server Error in '/' Application.
--------------------------------------------------------------------------------

Compilation Error
Description: An error occurred during the compilation of a resource required to service this request. Please review the following specific error details and modify your source code appropriately.

Compiler Error Message: BC30068: Expression is a value and therefore cannot be the target of an assignment.

Source Error:



Line 412: lblTotal.Text = GetItemTotal()
Line 413: If (formval = Promo) and (session("discount") = "") Then
Line 414: GetItemTotal() = GetItemTotal() - (GetItemTotal() * .05)
Line 415: session("discount") = GetItemTotal()
Line 416: end if

Can someone help me?

Thanks,


Dave

[rclark]

Line 414: GetItemTotal() = GetItemTotal() - (GetItemTotal() * .05)

GetItemTotal() appears to be a function or method. You can't assign a value to that type of object. If GetItemTotal() returns a double, then you could have something like:
dblItemTotal = GetItemTotal() - (GetItemTotal() * .05)