<% If Len(CStr(Request("id"))) > 0 and IsNumeric(Request("id")) then Select Case Request("id") Case 1: msg = strText_PackageNotAvailable & "

" & strText_NoPackage & "" Case 2: msg = msgAdlimit Case 3: msg = strText_OverAdsLimit & Request("limit") & " " & strText_Ads End Select End If %>

<%= msg %>