webForumDet fria alternativet

Pelleplus

20 svar · 416 visningar · startad av Asa

AsaMedlem sedan dec. 20011 860 inlägg
#1

Hur ska denna se ut? Detta är en gissning. Javascript å asp ihop är inte min specialare!

<%Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("forum.mdb" & ";pwd=dddddd;")

Set RS=Conn.Execute("Select * From users Order By username")%>

<script type="text/javascript">
<!--

<%Do Until RS.EOF%>

var PPlus = new PellePlus("<%=RS("username")%>", "<%=RS("sign")%>" );
PPlus.SetGroup("users");
PPlus.WritePlus();

<%RS.MoveNext
Loop%>

//-->
</script>

@ndersMedlem sedan juni 200032 969 inlägg
#2

Vad är det som inte fungerar?

AsaMedlem sedan dec. 20011 860 inlägg
#3

Det syns inte alls! En ) verkar fattas nånstans!

@ndersMedlem sedan juni 200032 969 inlägg
#4

Blir resultatet

<script type="text/javascript"> 
<!-- 

//--> 
</script>

Eller vad?

AsaMedlem sedan dec. 20011 860 inlägg
#5

Nej - man ser allt som finns i databasen!

http://www.gruvsjo.com/pplus/index1.asp

Kanske beror på att någon skrivit " i en post?

@ndersMedlem sedan juni 200032 969 inlägg
#6

Är det inte det du ber om?

Select * From users Order By username

:q

AsaMedlem sedan dec. 20011 860 inlägg
#7

Det var nog felet! Kolla nu. Satt att den bara skulle visa de 5 första och ingen har en " i sin post. Går det å fixa tro?

@ndersMedlem sedan juni 200032 969 inlägg
#8

Eh? Går vad att fixa?

AsaMedlem sedan dec. 20011 860 inlägg
#9

Jo! I databasen har någon av mina medlemmar skrivit ett " å när det finns med blir det javascriptfel. Kanske använda en replace?

En ) förväntas blir det då!

Post med " som info före å efter en text.
var PPlus = new PellePlus("VictorM", ""Tvivla på allt minst två gånger! Till och med att 2+2=4"<br/>" );

@ndersMedlem sedan juni 200032 969 inlägg
#10

Då förstår jag.

Replace (strängen, """", "\""")

Mvh,

AsaMedlem sedan dec. 20011 860 inlägg
#11

Okej - tack. Ska testa!

AsaMedlem sedan dec. 20011 860 inlägg
#12

Hmm - var skulle jag lägg den :/

<%Set Conn = Server.CreateObject("ADODB.Connection") 
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("forum.mdb" & ";pwd=xxxxxxxx;")

Set RS=Conn.Execute("Select * From users Order By username")%>

<script type="text/javascript">
<!--

<%x=0
Do Until RS.EOF Or x=50%>
var PPlus = new PellePlus("<%=RS("username")%>", "<%=RS("sign")%><br/>" );
  PPlus.SetGroup("users");
  PPlus.AppendRow("<%=RS("info")%>");
  PPlus.AppendRow("<%=RS("email")%>");
PPlus.WritePlus();
<%x=x+1
RS.MoveNext
Loop%>

//-->
</script>
@ndersMedlem sedan juni 200032 969 inlägg
#13

Är det inte i PPlus.AppendRow("<%=RS("info")%>"); problemet uppkommer?

PPlus.AppendRow("<%=Replace(RS("info"), """", "\""")%>");
AsaMedlem sedan dec. 20011 860 inlägg
#14

Precis med det funkade ej! :/ Testade det förrut oxå.

" ska synas som " iallafall.

@ndersMedlem sedan juni 200032 969 inlägg
#15

Om du replacear med &quot; istället för \"?

AsaMedlem sedan dec. 20011 860 inlägg
#16

Nope :/ Vad får du "" ifrån?

I denna som man ser i källan:

var PPlus = new PellePlus("VictorM", ""Tvivla på allt minst två gånger! Till och med att 2+2=4"<br/>" );

Så är första " före Tvivla en del av javascriptet!

http://www.gruvsjo.com/pplus/index1.asp

Får väl köra en Replace innan man sparar infot till databasen då :/

@ndersMedlem sedan juni 200032 969 inlägg
#17

Vad får du "" ifrån?

" Måste ju escape:as även i asp, eller hur?

AsaMedlem sedan dec. 20011 860 inlägg
#18

Nu hänger jag inte med riktigt! Escape:as?

@ndersMedlem sedan juni 200032 969 inlägg
#19

Om du i ASP ska göra något med ", till exempel skriva ut, så kan du inte skriva Response.Write " " ". Det genererar ett felmeddelande. Du skall skriva Response.write " "" " istället. Jämför med hur du gör för att sätta in apostrofer i databasen. Då ersätter du en med två, för att "rädda" koden från felmeddelanden och för att informationen skall komma fram korrekt.

Mvh,

AsaMedlem sedan dec. 20011 860 inlägg
#20

Okej vare så du mena! Okej - tackar!

136 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
134 ms — hämta tråd, inlägg och bilagor (db)