<%@ Language="VBScript" CodePage="65001" %> <% Option Explicit Response.Buffer = True Response.ContentType = "text/plain" Response.Charset = "utf-8" If Application("BhyluLab") <> "YES" Then Response.Status = "403 Forbidden" Response.Write "Use the separate Bhylu learning lab." Response.End End If Dim parts parts = Split("Mending|Buttons", "|") Response.Write UCase("mend") & vbLf Response.Write Mid("Workshop", 1, 4) & vbLf Response.Write (UBound(parts) - LBound(parts) + 1) & vbLf Response.Write CInt("2") & vbLf Response.Write IsNull(Null) %>