<% Dim pID pID = trim(Request("pID")) LankaAca = request("LankaAca") TestingSer = request("TestingSer") SeamateRec = request("SeamateRec") %> SeaMate Lanka