% function a2eKey()
' this function extracts the cript name ala key from the Server variable the script name
dim EndY, StartY, scr
scr = request.servervariables("SCRIPT_NAME")
' response.write request.servervariables("SCRIPT_NAME") & "
"
endY = instr(scr,".")
' response.write endy & "=en
"
starty = instrRev(scr,"/")
' response.write starty & "=st
"
a2eKey = mid(scr,starty+1,(endy-starty)-1) ' & "=scr
"
end function
%>
![]() |
Contact Us |
![]() |
|
A2E Artists
Pages
in Memory |
||
Artists2Events
Tel: 01269 597118 Fac: 01269 596056 - Unit #11. Betws Business Park, Ammanford,
Carmarthenshire, Wales UK SA18 2ET.
Last Modified:
| webmaster |