Asp/Javascript

Hejsan!
Vet inte riktigt om detta ska va i Javascript forumet, eller ASP, så flytta denna tråd om de ligger fel, tack.

Jag har ett javascript, som jag skulle behöva få in lite ASP i. Går det? Tror det ska gå:

     <script language="JavaScript1.2">

var delay=6000 //set delay between message change (in miliseconds)
var fcontent=new Array()
begintag='<font face="Verdana" size=2>' //set opening tag, such as font declarations
fcontent[0]="Thomsson P18: Jag är grym som fan!!"
fcontent[1]="Text text text"
fcontent[2]="Brynäs, Brynäs, Challalalalallalalallalalal la!!"
closetag='</font>'

var fwidth='500px' //set scroller width
var fheight='20' //set scroller height

var fadescheme=0 //set 0 to fade text color from (white to black), 1 for (black to white)
var fadelinks=1  //should links inside scroller content also fade like text? 0 for no, 1 for yes.

///No need to edit below this line/////////////////

var hex=(fadescheme==0)? 255 : 0
var startcolor=(fadescheme==0)? "rgb(255,255,255)" : "rgb(0,0,0)"
var endcolor=(fadescheme==0)? "rgb(0,0,0)" : "rgb(255,255,255)"

var ie4=document.all&&!document.getElementById
var ns4=document.layers
var DOM2=document.getElementById
var faderdelay=0
var index=0

if (DOM2)
faderdelay=2000

//function to change content
function changecontent(){
if (index>=fcontent.length)
index=0
if (DOM2){
document.getElementById("fscroller").style.color=startcolor
document.getElementById("fscroller").innerHTML=begintag+fcontent[index]+closetag
linksobj=document.getElementById("fscroller").getElementsByTagName("A")
if (fadelinks)
linkcolorchange(linksobj)
colorfade()
}
else if (ie4)
document.all.fscroller.innerHTML=begintag+fcontent[index]+closetag
else if (ns4){
document.fscrollerns.document.fscrollerns_sub.document.write(begintag+fcontent[index]+closetag)
document.fscrollerns.document.fscrollerns_sub.document.close()
}

index++
setTimeout("changecontent()",delay+faderdelay)
}

// colorfade() partially by Marcio Galli for Netscape Communications.  ////////////
// Modified by Dynamicdrive.com

frame=20;

function linkcolorchange(obj){
if (obj.length>0){
for (i=0;i<obj.length;i++)
obj[i].style.color="rgb("+hex+","+hex+","+hex+")"
}
}

function colorfade() {	         	
// 20 frames fading process
if(frame>0) {	
hex=(fadescheme==0)? hex-12 : hex+12 // increase or decrease color value depd on fadescheme
document.getElementById("fscroller").style.color="rgb("+hex+","+hex+","+hex+")"; // Set color value.
if (fadelinks)
linkcolorchange(linksobj)
frame--;
setTimeout("colorfade()",20);	
}

else{
document.getElementById("fscroller").style.color=endcolor;
frame=20;
hex=(fadescheme==0)? 255 : 0
}   
}

if (ie4||DOM2)
document.write('<div id="fscroller" ></div>')

window.onload=changecontent
</script>

och där det är text, den ska bort, och detta vill jag ha istället:

<%
x = 0
do until x = 10 OR rs.EOF = TRUE
x = x +1
%>
<a href="minsida.asp?id=<%=rs("namnid")%>" target="main"><b><%=rs("namn")%>:</b></a> <%=rs("text")%> <font color="#800000"><i>(<%=rs("datum")%>)</i></font>&nbsp;&nbsp;
<% rs.movenext
loop
%>

Går det? Vore as bra om någon kunde hjälpa mig!

Mvh Adde

Visst går det bra. Men vad är problemet?

Jesper T skrev:

Visst går det bra. Men vad är problemet?

jag har ingen aning om hur jag för in asp´n i koden?

och där det är text, den ska bort, och detta vill jag ha istället

Ok.
Klipp ut texten. Klistra in ASP-koden... ;)
Skämt å sido. Jag fattar ingenting.

Jesper T skrev:

och där det är text, den ska bort, och detta vill jag ha istället

Ok.
Klipp ut texten. Klistra in ASP-koden... ;)
Skämt å sido. Jag fattar ingenting.

Alltså?

<%
x = 0
do until x = 10 OR rs.EOF = TRUE
x = x +1
%>
fcontent[0]="<a href="minsida.asp?id=<%=rs("namnid")%>" target="main"><b><%=rs("namn")%>:</b></a> <%=rs("text")%> <font color="#800000"><i>(<%=rs("datum")%> )</i></font>"

<% rs.movenext
loop
%>

Fick de inte att funka tidigare men, har jag gjort nå fel?

Men blir det javascript-fel, eller ett VBscript-fel?

Do until rs.EOF OR x = 10

så här ser min kod ut:

            <script language="JavaScript1.2">
var delay=6000 //set delay between message change (in miliseconds)
var fcontent=new Array()
<%
x = 0
do until x = 10 OR rs.EOF = TRUE
x = x +1
%>
begintag='<font face="Verdana" size=2>' //set opening tag, such as font declarations
fcontent[0]="<a href="minsida.asp?id=<%=rs("namnid")%>" target="main"><b><%=rs("namn")%>:</b></a> <%=rs("text")%> <font color="#800000"><i>(<%=rs("datum")%>)</i></font>&nbsp;&nbsp;"
closetag='</font>'
<% rs.movenext
loop
%>

var fwidth='500px' //set scroller width
var fheight='20' //set scroller height

var fadescheme=0 //set 0 to fade text color from (white to black), 1 for (black to white)
var fadelinks=1  //should links inside scroller content also fade like text? 0 for no, 1 for yes.

///No need to edit below this line/////////////////

var hex=(fadescheme==0)? 255 : 0
var startcolor=(fadescheme==0)? "rgb(255,255,255)" : "rgb(0,0,0)"
var endcolor=(fadescheme==0)? "rgb(0,0,0)" : "rgb(255,255,255)"

var ie4=document.all&&!document.getElementById
var ns4=document.layers
var DOM2=document.getElementById
var faderdelay=0
var index=0

if (DOM2)
faderdelay=2000

//function to change content
function changecontent(){
if (index>=fcontent.length)
index=0
if (DOM2){
document.getElementById("fscroller").style.color=startcolor
document.getElementById("fscroller").innerHTML=begintag+fcontent[index]+closetag
linksobj=document.getElementById("fscroller").getElementsByTagName("A")
if (fadelinks)
linkcolorchange(linksobj)
colorfade()
}
else if (ie4)
document.all.fscroller.innerHTML=begintag+fcontent[index]+closetag
else if (ns4){
document.fscrollerns.document.fscrollerns_sub.document.write(begintag+fcontent[index]+closetag)
document.fscrollerns.document.fscrollerns_sub.document.close()
}

index++
setTimeout("changecontent()",delay+faderdelay)
}

// colorfade() partially by Marcio Galli for Netscape Communications.  ////////////
// Modified by Dynamicdrive.com

frame=20;

function linkcolorchange(obj){
if (obj.length>0){
for (i=0;i<obj.length;i++)
obj[i].style.color="rgb("+hex+","+hex+","+hex+")"
}
}

function colorfade() {	         	
// 20 frames fading process
if(frame>0) {	
hex=(fadescheme==0)? hex-12 : hex+12 // increase or decrease color value depd on fadescheme
document.getElementById("fscroller").style.color="rgb("+hex+","+hex+","+hex+")"; // Set color value.
if (fadelinks)
linkcolorchange(linksobj)
frame--;
setTimeout("colorfade()",20);	
}

else{
document.getElementById("fscroller").style.color=endcolor;
frame=20;
hex=(fadescheme==0)? 255 : 0
}   
}

if (ie4||DOM2)
document.write('<div id="fscroller" ></div>')

window.onload=changecontent
</script>

Men det händer inget alls :/ de e de som e problemet

Jesper T skrev:

Men blir det javascript-fel, eller ett VBscript-fel?

Do until rs.EOF OR x = 10

Grejjen e den att jag tror den skriver ut 10 stycken sånna här i koden, det syns i källan:

fcontent[0]="<a href="minsida.asp?id={4FA4A155-0A5F-4A3E-A157-B34536FDB108}" target="main"><b>gronwall:</b></a> Tjenare alla! hoppas alla är glada! /Mig <font color="#800000"><i>(2004-03-26 00:17:23)</i></font>  "

Antar att de ska stå [1] osv.. eller?

fcontent[<%=x%>]

@nders skrev:

fcontent[<%=x%>]

Nu funkar det!

Thompa__85 skrev:

@nders skrev:

fcontent[<%=x%>]

Nu funkar det!

Förutom att det står undefined i första posten
sen rullar de på som de ska! Men var 10:ende står det alltså undefined på?

<%
x = [b]1[/b]
do until x = 10 OR rs.EOF = TRUE
x = x +1
%>

Jesper T skrev:

<%
x = [b]1[/b]
do until x = 10 OR rs.EOF = TRUE
x = x +1
%>

står fortfarande undefined tyvärr..

så här ser koden ut:

<script language="JavaScript1.2">
var delay=6000 //set delay between message change (in miliseconds)
var fcontent=new Array()
<%
x = 1
do until x = 10 OR rs.EOF = TRUE
x = x +1
%>
begintag='<font face="Verdana" size=1> <center>' //set opening tag, such as font declarations
fcontent[<%=x%>]='<a href="minsida.asp?id=<%=rs("namnid")%>" target="main"><b><%=rs("namn")%>:</b></a> <%=rs("text")%> <i>(<%=rs("datum")%>)</i>'
closetag='</font></center>'
<% rs.movenext
loop
%>

testa:

<script language="JavaScript1.2">
var delay=6000 //set delay between message change (in miliseconds)
var fcontent=new Array()
<%
x = 0
do until x = 10 OR rs.EOF = TRUE
%>
begintag='<font face="Verdana" size=1> <center>' //set opening tag, such as font declarations
fcontent[<%=x%>]='<a href="minsida.asp?id=<%=rs("namnid")%>" target="main"><b><%=rs("namn")%>:</b></a> <%=rs("text")%> <i>(<%=rs("datum")%> )</i>'
closetag='</font></center>'
<% 
x = x +1
rs.movenext
loop
%>

Poffe skrev:

testa:

<script language="JavaScript1.2">
var delay=6000 //set delay between message change (in miliseconds)
var fcontent=new Array()
<%
x = 0
do until x = 10 OR rs.EOF = TRUE
%>
begintag='<font face="Verdana" size=1> <center>' //set opening tag, such as font declarations
fcontent[<%=x%>]='<a href="minsida.asp?id=<%=rs("namnid")%>" target="main"><b><%=rs("namn")%>:</b></a> <%=rs("text")%> <i>(<%=rs("datum")%> )</i>'
closetag='</font></center>'
<% 
x = x +1
rs.movenext
loop
%>

Hmm nej, står fortfarande undefined...
jag fattar inte varför bara?

Igentligen är det bättre om du klipper ur källkoden och postar den i javascriptforumet eftersom att det är ett javascriptproblem.

Jesper T skrev:

Igentligen är det bättre om du klipper ur källkoden och postar den i javascriptforumet eftersom att det är ett javascriptproblem.

Okej, bifogar källkoden i ett txt dokument.
och så kan ni flytta denna tråd till javascript om det är lugnt?

Tack på förhand!

Mvh Adde :)

Nej, jag flyttar helst inte tråden eftersom den innehåller tonvis med VBScript. Lämna denna tråd istället och skapa en ny i JavaScript-forumet. Posta gärna en länk till den nya tråden i denna tråd, dock.

MVH
OveRRidE, moderator

Okej, jag förstår!

Då var det fixat!
http://www.webforum.nu/showthread.php?s=&threadid=98341

Tack!
Mvh Adde