Метод createRange
<SCRIPT LANGUAGE="VBSCRIPT"> Sub document_onmouseup() Set MyRange = document.selection.createRange strMsg = "Выделенный текст: " & MyRange.text MsgBox strMsg End Sub </SCRIPT>
Содержание