McDMedlem sedan mars 20002 520 inlägg:D älskar min rubrik men det är precis det jag är ute efter...
Om fältet "forklaring" är = "n/a" (finns i databasen i fältet forklaring)
Skriv då till ...
"Anledningen till att det inte finns någon förklaring till detta bla bla bla"
Dvs
=============================================
Förklaring: n/a
Anledningen till att det inte finns någon förklaring till detta bla bla bla
=============================================
MmozillaMedlem sedan juli 20011 084 inlägg if(rs("forklaring") = "n/a") Then
Response.Write "Anledningen till att det inte finns någon förklaring till detta bla bla bla"
end if
Borde väl fungera? :q :OO
(du skriver ju i princip det själv, fast på svenska)
Om = if
fältet "forklaring" = rs("forklaring")
är = "n/a" (finns i databasen i fältet forklaring) = "n/a"
Skriv då till .. = Then Response.Write...
McDMedlem sedan mars 20002 520 inläggförlåt men glömde skriva det ser ut så här idag...
<%=Free(FixLink(rs("forklaring")))%>
<%if Free(FixLink(rs("forklaring"))) = 'n/a') Then
Response.Write "Anledningen till att det inte finns någon förklaring till detta bla bla bla"
end if%>
Syntax error
/paike/paikebans/default.asp, line 231, column 37
if Free(FixLink(rs("forklaring"))) = 'n/a') Then
Nä har även testat med...
<%If Rs("forklaring") = "n/a" then %>
<i>Om det inte finns någon förklaring till din ban
beror detta på att du är bannad av HLGuard / Scirpt
på servern eller att du bannades innan detta system infördes.</i>
<%Else%>
<%=Free(FixLink(rs("forklaring")))%>
<%End if%>
Funkar inte heller :(
Microsoft VBScript runtime (0x800A005E)
Invalid use of Null: 'Replace'
/paike/default/functions.inc, line 206
@ndersMedlem sedan juni 200032 967 inläggOch vilken är rad 206? Du kan inte använda replace på null, så det måste du hantera.
McDMedlem sedan mars 20002 520 inläggjag vill inte använda replace...
jag har skrivit in i databasen på hur många ställen som helst "n/a"
och när det står "n/a" vill jag det ska komma fram mer text...
<i>Om det inte finns någon förklaring till din ban
beror detta på att du är bannad av HLGuard / Scirpt
på servern eller att du bannades innan detta system infördes.</i>
fattar mig inte på detta kör jag med <%=Free(FixLink(rs("forklaring")))%>
så får jag ut från databasen "n/a" genom att det är inskriviet i fältet forklaring alltså helt rätt...
är forklaring i databasen "Du är bannad för att du inte kan betedig!" så kommer det fram...
Function FixLink(strText)
'strText = Server.HTMLEncode(strText)
strText = Replace(strText,VbCrLf,VbCrLf&" <br> ")
HyperArray = Split(strText)
For Each ord in HyperArray
if Len(ord) > 7 then
ord2 = ord
if Lcase(left(ord,7)) = "http://" then
strText2=strText2 & "<a href='"&ord&"' target=""_blank"">"&FixLen2(ord2,70)&"</a> "
elseif InStr(ord,"@")>1 then
strText2=strText2 & "<a href='mailto:"&ord&"'>"&FixLen2(ord2,70)&"</a> "
elseif Lcase(left(ord,4)) = "www." then
strText2=strText2 & "<a href='http://"&ord&"' target=""_blank"">"&FixLen2(ord2,70)&"</a> "
else
strText2=strText2&ord&" "
end if
else
strText2=strText2&ord&" "
end if
next
FixLink = strText2
End Function
men den funktionen fungerar som sagt var...
@ndersMedlem sedan juni 200032 967 inlägg
jag vill inte använda replace...
Det är ju det du gör i funktionen, och det är därför du får ett felmeddelande. Lägg denna rad överst i funktionen så slipper du felmeddelandet i alla fall:
strText = "" & strText
McDMedlem sedan mars 20002 520 inläggJo sant då funka det ... MEN då skriver det inte ut förklaringen om det finns någon... :(
Detta funkar men förklaringen skrivs aldrig ut efter att jag laggt in din strText i min funktion..
<%If Rs("forklaring") = "n/a" then %>
<i>Om det inte finns någon förklaring till din ban
beror detta på att du är bannad av HLGuard / Scirpt
på servern eller att du bannades innan detta system infördes.</i>
<%Else%>
<%=Free(FixLink(rs("forklaring")))%>
<%End if%>
Här är hela coden till mitt stycke.. Den funka klockrent...
men inte när jag försöker med det översta...
<table width="96%" border="1" cellspacing="0" cellpadding="4" bordercolor="#FF0000">
<tr>
<td>
<table width="99%" border="0" cellspacing="0" cellpadding="0" bordercolor="#FF0000" align="center">
<tr>
<td><b>Datum: </b><%=Left(rs("adat"),10)%> <b>SteamID</b>: <%=rs("steamid")%> <b>Nick:
</b><%=rs("nick")%> <b>Admin:</b> <%=rs("Admin")%><br>
<hr>
<br>
<b>Förklaring: </b> <%=Free(FixLink(rs("forklaring")))%>
<br>
<br>
<b>Ban Tid</b>:
<%If Rs("tid") = 0 then %>
<font color="#FF0000"><b>Permanent Ban</b></font>
<%Else%>
<font color="#FFFF00"><%=rs("tid")%> Min</font>
<%End if%>
<br>
<br>
» <a href="default.asp?sida=forum&fID=4&visa=las&id=3808">Har
du synpunkter gällande detta läs denna forumtråd</a><br>
<br>
» <a href="default.asp?sida=paikebans">Tillbaka</a> <br>
<br>
</td>
</tr>
</table>
</td>
</tr>
</table>
@ndersMedlem sedan juni 200032 967 inläggProva:
<% sForklaring = "" & Rs("forklaring")
If sForklaring = "n/a" then %>
<i>Om det inte finns någon förklaring till din ban
beror detta på att du är bannad av HLGuard / Scirpt
på servern eller att du bannades innan detta system infördes.</i>
<%
Else
Response.write Free(FixLink(sForklaring))
End if
%>
McDMedlem sedan mars 20002 520 inläggDet funkade tack @nders...
Var det mitt "n/a" (typ reserverat ord) som togs som nått annat... då det gick o göra så längre ner på tiden?
@ndersMedlem sedan juni 200032 967 inläggNej, det beror antagligen på att fältet forklaring är av typen PM / Memo. Under vissa förutsättningar blir det knas då.
McDMedlem sedan mars 20002 520 inläggaa stämmer bra det är PM :)
Fältet tid var vanlig text
Tack...