Witaj w DHTML Zone




m_MenuWnd=window.open ("l2doc151.htm","Menu","toolbar=no,fullscreen=0,status=0,resizable=0,width=340,height=15mm,top=10,left=10")




Set m_MainRange=document.body.createTextRange
m_Range.collapse(0)
m_Range.pasteHTML(Chr(window.event.keycode))



Sub Click()
Set m_Range=document.body.createTextRange
m_Range.moveToPoint(window.event.x, window.event.y)
m_Range.expand("word")
m_Range.select
End Sub