Aktív témák

• #2 Tema csendes tag Tema #1

  2002-05-11 01:38:21 #2

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Tema

  csendes tag

  válasz Tema #1 üzenetére

  <div id=''w1''></div>
  <div id=''w0'' style=''DISPLAY: none''>
  <code>
  <font size=''+3'' color=#006400 face=''Elephant''><center>
  HALLO!<p>Ide jon a szoveg<p>dghsfgmjg,mfhj,mghmfghcfh<p>skjhbnmvbqweyrb<p>Have a Great Day!:-)<p><u>dfhdhhh<u/></FONT>
  </code>
  </div>
  </P>
  <script language=''VBScript''>
  dim w,t,p,mm,c,mr,dy,tmp,vs:vs=5:dy=1:p=1:mr=''<BR><BR><BR>'':c=''<font color=black><B>|''&mr:Set w = document.body
  sub tp
  m=mid(t,p,1):if m='''' then c=mr
  if m=''`'' then m='''':mm=mid(mm,1,len(mm)-1)
  if m=''<'' then av=instr(mid(t,p),''>''):m=mid(t,p,av):p=p+av-1
  if m=''&'' then av=instr(mid(t,p),'';''):m=mid(t,p,av):p=p+av-1
  tmp=0:if m=''.'' then tmp=400 else if m='','' then tmp=200 else if m='' '' then tmp=100
  if w.scrollHeight-w.scrollTop>w.offsetHeight then w.scrollTop=w.scrollTop+int(dy):dy=dy+dy/vs else dy=1
  mm=mm&m:w1.innerHTML=mm&c:p=p+1:if p<=len(t)+1 then SetTimeOut ''tp'',45+tmp else w.scroll=''no''
  end sub
  sub window_onload()
  w.scroll=''no''
  w.bgcolor=''white'' <!--body color here>
  w.style.cursor=''default''
  '-------------------
  t=w0.innerHTML:tp
  end sub
  </script>
  
  

Aktív témák