Use Microsoft word spell checker utility
Client machine has word 2000
Browser is I.E.
Activex scripting is enabled
Submitted On | |
By | Anil P |
Level | Advanced |
User Rating | 4.9 (44 globes from 9 users) |
Compatibility | ASP (Active Server Pages), HTML, VbScript (browser/client side) |
Category |Internet/ Browsers/ HTML World |ASP / VbScript Archive File |
<SCRIPT LANGUAGE=vbscript>
<!--
'SpellChecker
' PURPOSE: This function accepts Text data for which spell checking has to be done.
' Return's Spelling corrected data
'
Function SpellChecker(TextValue)
Dim objWordobject
Dim objDocobject
Dim strReturnValue
'Create a new instance of word Application
Set objWordobject = CreateObject("word.Application")
objWordobject.WindowState = 2
objWordobject.Visible = True
'Create a new instance of Document
Set objDocobject = objWordobject.Documents.Add( , , 1, True)
objDocobject.Content=TextValue
objDocobject.CheckSpelling
'Return spell check completed text data
strReturnValue = objDocobject.Content
'Close Word Document
objDocobject.Close false
'Set Document to nothing
Set objDocobject = Nothing
'Quit Word
objWordobject.Application.Quit True
'Set word object to nothing
Set objWordobject= Nothing
SpellChecker=strReturnValue
End Function
-->
</SCRIPT>