Microsoft VBScript runtime error '800a0009'

Subscript out of range: 'split(...)'

/PhotoAlbum.asp, line 18


<%
recuperogalleria = Request.QueryString("ShowSub")
aa=split(recuperogalleria," ")(0)
'response.write (aa)
%>


<%=aa%>