<% ' build SendBackTo String ' This will automatically send the system back to SpellingDone.asp without you haveing to change any of this script. dim SendBackTo dim CdyneAddr dim imageAddr if lcase(request.ServerVariables("HTTPS")) = "off" then SendBackTo = "http://" 'unsecure CdyneAddr = "http://www.cdyne.com/SpellChecker/cs.aspx" imageAddr = "http://www.cdyne.com/SpellChecker/i/wait.gif" else SendBackTo = "https://" 'secure CdyneAddr = "https://secure.cdyne.com/SpellChecker/cs.aspx" imageAddr = "https://secure.cdyne.com/SpellChecker/i/wait.gif" end if SendBackTo = SendBackTo & trim(request.ServerVariables("SERVER_NAME")) SendBackTo = SendBackTo & left(trim(request.ServerVariables("URL")),instrrev(trim(request.ServerVariables("URL")),"/")) SendBackTo = SendBackTo & "SpellingDone.asp" %> Processing...