Hirdetés

2024. június 10., hétfő

Gyorskeresés

Útvonal

Fórumok  »  Szoftverfejlesztés  »  VBScript (téma lezárva)

Hozzászólások

(#1) Tema


Tema
csendes tag

Sziasztok,

Nehany honapja ismerkedem a HTML-el es VBscrip-ig meg nem jutottam.Egy levelezos tanfolyamot csinalok es ezert kellett nyitnom egy site-ot,hogy legyen hol ellenorizni a lecket.Azert,hogy az index oldal ne legyen olyan ures,szeretnek hozzaadni egy typing text-et.A kodokat megszervaltam es megirtam notepad-ban.Ha a gepemrol megnyitom nagyon jol szuperal,de fellotem a szerverre(geocities)es ot meg nem tudom megnyitni.Ezek utan nem is probalkoztam azzal,hogy bemasoljam az index-be...asszem valami hianyzik.Javaslatokat elore is koszonom.:)

Bocsi a hosszu uzenet miatt.(a kod megy a kovetkezovel)

<b>T</b>actician <b>E</b>xploratory <b>M</b>ultidimensional <b>A</b>ndroid

(#2) Tema válasza Tema (#1) üzenetére


Tema
csendes tag

<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>

<b>T</b>actician <b>E</b>xploratory <b>M</b>ultidimensional <b>A</b>ndroid

(#3) Tema válasza Tema (#2) üzenetére


Tema
csendes tag

Asszem jobb lett volna nem megemliteni ezt a problemat mert kezd eldurvulni....Mint mondtam ez a bizonyos *.html file mukodik es csinalja a dolgat a gepemrol IE6-el(Ennek a forraskodjat masoltam be ide a forumba).Tettem 1 probat es az elozo uzenetben lathato kodot(szorostu-borostul)bemasoltam(copy-paste)a Notepad-be,elmentettem *.html filekent,megnyitottam,es NEM mukodik...pedig a kod UGYANAZ mint a mukodoe(hiszen annak a pontos masa!!!).

Lehet,hogy megiscsak megvarom amig ideerunk a tanfolyam anyagaval.:)

<b>T</b>actician <b>E</b>xploratory <b>M</b>ultidimensional <b>A</b>ndroid

(#4) guest válasza Tema (#3) üzenetére


guest
veterán

nevezd át asp-re...

prohardver vendég

(#5) Tema válasza guest (#4) üzenetére


Tema
csendes tag

Most viccelsz...?

<b>T</b>actician <b>E</b>xploratory <b>M</b>ultidimensional <b>A</b>ndroid

(#6) guest válasza Tema (#5) üzenetére


guest
veterán

Szerintem lemaradt a TypingText ablakat definialo resz, ami ugye tartalmazza a helyet, meretet, max sorhosszt, stb...

prohardver vendég

(#7) Tema válasza guest (#6) üzenetére


Tema
csendes tag

Koszi guest,de szerencsere megoldodott.:)
A koddal csak annyi a problema,hogy az MSN-re lett irva ezert csak ott mukodik.

Egyebkent a hely a <center>tag-el,a meret a <font>tag-el es a sorhossz egyszeruen a <p>tag-el van megadva.

<b>T</b>actician <b>E</b>xploratory <b>M</b>ultidimensional <b>A</b>ndroid

(#8) guest válasza Tema (#7) üzenetére


guest
veterán

OK. Jo szorakozast a tovabbiakhoz. Egyebkent az XP-ben van egy jo kis debugger html-hez. Azzal sokmindent meg lehet csinalni. Beepitettek par alapfunkciot is, mint pl. a TypingText ablak behelyezeset az oldalba. Kicsit hasonlit a VisualBasic fejlesztokornyezetehez. Nemi help is talalhato a html-t felepito codokhoz es scriptekhez. Ha lesz kedved probald ki. Mondjuk csak ezert nem erdemes az XP-t felpakolni :)

prohardver vendég

(#9) Tema válasza guest (#8) üzenetére


Tema
csendes tag

Hat ez marha kellemetlen nekem mert xp-t hasznalok de meg nem talalkoztam meg vele.
Mindegyik verzio tartalmazza?

<b>T</b>actician <b>E</b>xploratory <b>M</b>ultidimensional <b>A</b>ndroid

(#10) guest válasza Tema (#9) üzenetére


guest
veterán

En angol XP profot nyuvok abban benne van. Eddig nem is talalkoztam vele. A forraskododat bemasoltam egy akarmi.htm fájlba, majd ezen Entert utve a WC-ben elindult az IE es egybol egy ablakot hozott fel, hogyaszondja ilyen meg olyan hiba van a forrasban es akarom-e debuggni. Akartam es felkinalt egy ujabb ablakban egy debuggert amit elfogadva bevagott a fentebb emlitett debugger-fejleszto? progiba. Van benne Design meg Source nezet, mint a VB fejlesztokornyezeteben meg bal oldalt a beillesztheto objektumok (van jopar!).
Ha konkretan erdekel mit kell elinditani hozza megnezhetem, de csak Hetfo estere tudok csak infot mondani majd rola.

prohardver vendég

(#11) Tema válasza guest (#10) üzenetére


Tema
csendes tag

Koszi a kedvesseged,de engem egy Angol XPHome nyuv, :)

<b>T</b>actician <b>E</b>xploratory <b>M</b>ultidimensional <b>A</b>ndroid

(#12) Tema válasza Tema (#11) üzenetére


Tema
csendes tag

Csak megemlitenem. &#9787
Gondolom a juzerek tobbsege lama egy ilyen kod megirasahoz,de megis szeretne megmozgatni a betuket,akkor sasolja meg ezt:
[L]http://www.dynamicdrive.com/[/L]

<b>T</b>actician <b>E</b>xploratory <b>M</b>ultidimensional <b>A</b>ndroid

(#13) guest


guest
veterán

Microsoft Script Editor nev alatt fut a kicsike

prohardver vendég

Útvonal

Fórumok  »  Szoftverfejlesztés  »  VBScript (téma lezárva)
Copyright © 2000-2024 PROHARDVER Informatikai Kft.