trasformare un vbscript in javascript ..????

Alex20

Nuovo Utente
26 Gen 2005
1
0
0
39
Salve a tutti!!!! Ieri navugando per caso ho trovato queso script!!!
<SCRIPT language=vbscript>
<!--
document.write("<font color='#000000' font size='1' font face='arial narrow'>")
d=weekday(date)
if d=1 then
today="Sterday"
elseif d=2 then
today="Sunday"
elseif d=3 then
today="Monday"
elseif d=4 then
today="Trewsday"
elseif d=5 then
today="Hevensday"
elseif d=6 then
today="Mersday"
elseif d=7 then
today="Highday"
end if

e=day(now+8)
m=month(date)
g=day(now)
if g>=1 and g<=22 and m=1 then
mon="Afteryule"
elseif g=23 and m=1 then
mon="Solmath"
e=1
elseif g>23 and m=1 then
mon="Solmath"
e=e+1
elseif g>=1 and g<=20 and m=2 then
mon="Solmath"
e=e+1
elseif g=21 and m=2 then
mon="Solmath"
e=30
elseif g=22 and m=2 then
mon="Rethe"
e=1
elseif g>=23 and m=2 then
mon="Rethe"
e=e-1
elseif g>=1 and g<=23 and m=3 then
mon="Rethe"
e=e-1
elseif g=24 and m=3 then
mon="Astron"
e=1
elseif g>=25 and m=3 then
mon="Astron"
elseif g=1 and m=4 then
mon="Astron"
elseif g>=2 and g<=22 and m=4 then
mon="Astron"
elseif g>=23 and m=4 then
mon="Thrimidge"
elseif g=1 and m=5 then
mon="Thrimidge"
elseif g>=2 and g<=22 and m=5 then
mon="Thrimidge"
elseif g=23 and m=5 then
mon="Forelithe"
e=1
elseif g>=24 and m=5 then
mon="Forelithe"
e=e+1
elseif g=1 and m=6 then
mon="Forelithe"
e=e+1
elseif g>=2 and g<=21 and m=6 then
mon="Forelithe"
e=e+1
elseif g=22 and m=6 then
e="First Lithe"
elseif g=23 and m=6 then
e="Midyear's Day"
elseif g=24 and m=6 then
e="Second Lithe"
elseif g>=25 and m=6 then
mon="Afterlithe"
e=e-2
elseif g=1 and m=7 then
mon="Afterlithe"
e=e-2
elseif g>=2 and g<=23 and m=7 then
mon="Afterlithe"
e=e-2
elseif g=24 and m=7 then
e=30
mon="Afterlithe"
elseif g>=25 and m=7 then
mon="Wedmath"
e=e-1
elseif g=1 and m=8 then
mon="Wedmath"
e=e-1
elseif g>=2 and g<=23 and m=8 then
mon="Wedmath"
e=e-1
elseif g>=24 and m=8 then
mon="Halimath"
elseif g>=1 and g<=22 and m=9 then
mon="Halimath"
elseif g>=23 and m=9 then
mon="Winterfilth"
elseif g>=1 and g<=22 and m=10 then
mon="Winterfilth"
elseif g=23 and m=10 then
mon="Blotmath"
e=1
elseif g>=24 and m=10 then
mon="Blotmath"
e=e+1
elseif g=1 and m=11 then
mon="Blotmath"
e=e+1
elseif g>=2 and g<=21 and m=11 then
mon="Blotmath"
e=e+1
elseif g=22 and m=11 then
mon="Foreyule"
e=1
elseif g>=23 and m=11 then
mon="Foreyule"
e=e+1
elseif g=1 and m=12 then
mon="Foreyule"
e=e+1
elseif g=>2 and g<=21 and m=12 then
mon="Foreyule"
e=e+1
elseif g=22 and m=12 then
e="First Yule"
elseif g=23 and m=12 then
e="Second Yule"
elseif g=>24 and m=12 then
mon="Afteryule"
end if

document.write("<font size='2' font color='ffffff' font face='arial narrow'>")
document.Write " " & today & ", " & e & " " & mon & " " & Year(date)+1018
//-->
document.write("<font size='2' font color='ffffff' font face='arial narrow'>")
document.Write " Shire Calendar"
</SCRIPT>

Si può trasformare questo vbscript in un javascript???? Se si come si fa???? :confused: Qualcuno mi può aiutare???
Grazie!!!! :)
 
Discussioni simili
Autore Titolo Forum Risposte Data
T aiuto per trasformare un quiz fatto in JS in un quiz in JQUERY jQuery 0
M Trasformare sito in app Sviluppo app per Android 0
S [MS Access] trasformare un numero in lettere in un report MS Access 1
A [Visual Basic] Trasformare stringa in ora Visual Basic 0
C Trasformare una foto digitale con photoshop Photoshop 5
Trabba [MySQL] Trasformare tabella con totali MySQL 2
matteoraggi [PHP] Trasformare una animazione html5 in un file video PHP 0
lidya123 ALGORITMO per trasformare/mappare/coordinare Tocchi tra Tablet e Desktop PC Programmazione 0
V [Javascript] Trasformare secondi a giorni, ore, minuti Javascript 12
fabryx [PHP]RISOLTO: Trasformare righe in colonne assegnando singole variabili PHP 10
S Problema trasformare una stringa in html object Javascript 0
A trasformare l'iphone in un cicalino attraverso un app Sviluppo app per iOS 5
E Trasformare in html HTML e CSS 10
J [risolto] Trasformare la seguente classe PHP PHP 2
N trasformare la rete di casa del pc fisso in una rete wifi Reti LAN e Wireless 1
F Trasformare risultato funzione in maiuscolo (uppercase) Javascript 7
M Trasformare una pagina PHP caricata in un documento PDF o XML PHP 3
S Script per trasformare apici in altri caratteri Javascript 4
A [html] trasformare codice in html PHP 0
A Trasformare un immagine in una tabella HTML e CSS 16
L Trasformare delle immagini tutte nella stessa dimensione Photoshop 1
B Trasformare/convertire codice javascript in link URL Javascript 11
L Trasformare array in stringa Classic ASP 0
M Trasformare una immagine in vettoriale. Webdesign e Grafica 8
max_400 trasformare .SCR (Screensaver) in .SWF oppure in gif Flash 7
LaKanka trasformare una data in formato RFC 2822 PHP 5
N trasformare una stringa in variabile PHP 2
P trasformare una selezione con photoshop Photoshop 1
H Trasformare i link in immagini Programmazione 2
T Trasformare da MAIUSCOLO a minuscolo Classic ASP 1
V Come trasformare correttamente una tabella HTML HTML e CSS 6
V BOX fatto con tabella HTML da trasformare in XHTML HTML e CSS 6
G TRASFORMARE MP3 in CODICI HTML HTML e CSS 2
metalgemini trasformare le date PHP 3
M Sapete come trasformare una presentazione di PowerPoint in una presentazione in dvd? Webdesign e Grafica 1
W Errore di run-time di Microsoft VBScript error '800a0035' Impossibile trovare il file Classic ASP 0
felino [VBScript] [HP UFT] Iterare nodi di un TreeView (WPF) Visual Basic 0
felino [ASP.Net] [VbScript] Catturare valore del Hard Faults (Page Fault) ASP.NET 0
felino [VBScript] Json: catturare un Value dato il suo Nome Visual Basic 1
felino [VBScript] XML Prendere il Value di un childnode attravervo il nome del nodo Visual Basic 0
felino [VbScript] SwfObject: prendere il contenuto di una cella Visual Basic 0
felino [VbScript] Connession Database Oracle Programmazione 8
L vbscript e javascript Javascript 0
T richamare funzione vbscript Classic ASP 1
L Collegare un virus VBScript a un link?? Sicurezza e Virus 0
I [Risolto] ASP VBSCRIPT e PAYPAL problemi con le spese di spedizione dinamiche Classic ASP 3
G Vbscript e access MS Access 0
grottafelix Microsoft VBScript compilation error '800a0401' Classic ASP 3
L Cancellare CAB con JavaScript / VbScript Javascript 1
A ASP javascript e ASP VBscript Classic ASP 6

Discussioni simili