Sub index_FSCommand(ByVal command, ByVal args) If LCase(command) = "quit" Then window.close ElseIf LCase(command) = "settitle" Then window.document.title = args End If End Sub 博聚网