skummis med replace..

6 svar · 155 visningar · startad av tlee 2 aug. 2001

tleeMedlem sedan mars 2001290 inlägg

Frågan2 aug. 2001 09:14#1

Microsoft VBScript runtime error '800a005e'

Invalid use of Null: 'Replace'

/koll/show.asp, line 63

Detta fel orsakar följande kod:

If ( Instr(DB_QUERY("col_Text"),vbCrLf)) Then
	Response.Write(Replace(DB_QUERY("col_Text"), vbCrLf,"<BR>"))

Else
	Response.Write(DB_QUERY("col_Text"))
End If

Varför..

Egentligen borde man väl kunna bara skriva

Response.Write(Replace(DB_QUERY("col_Text"), vbCrLf,"<BR>"))

och då borde han kunna räkna ut att ifall det finns ett vbCrLf så byt ut till ett <br> annars låt det vara som det är... brukar det inte va så eller är jag helt borta nu ?

------------------
the man with the golden bottle..

@ndersMedlem sedan juni 200032 967 inlägg

2 aug. 2001 09:18#2

Egentligen borde man väl kunna bara skriva...

jo, egentligen. men faktumet att du får ut null i fältet spökar till det.

if not isnull(DB_QUERY("col_Text")) then Response.Write Replace(DB_QUERY("col_Text"), vbCrLf,"<BR>")

red: plockade bort en parentes i din kod.

mvh,

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
can i borrow your goat?
</A>

[Redigerat av @nders den 02 aug 2001]

tleeMedlem sedan mars 2001290 inlägg

2 aug. 2001 09:28#3

If Not IsNull(DB_QUERY("col_Text")) Then _
	Response.Write Replace(DB_QUERY("col_Text"), vbCrLf,"<BR>")

spökar fortfarande till det för jag får samma fel.. det är helt sjukt.. om jag väljer att skriva såhär.

Response.Write(DB_QUERY("col_Text"))

If Not IsNull(DB_QUERY("col_Text")) Then _
	Response.Write Replace(DB_QUERY("col_Text"), vbCrLf,"<BR>")

så får jag inget fel.. men då ignorerar han IF satsen och bara skriver ut strängen utan några som helst <BR>..

trött blir man..

------------------
the man with the golden bottle..

jorgenMedlem sedan feb. 20012 412 inlägg

2 aug. 2001 09:47#4

Hej!

Det är inte så att du glömt WRAP="virtual" i formuläret?

mvh Jörgen

------------------
*** Var går gränsen mellan långa kortbyxor och korta långbyxor? ***

tleeMedlem sedan mars 2001290 inlägg

2 aug. 2001 09:53#5

>Det är inte så att du glömt WRAP="virtual" i formuläret?

Vad är det för något ?.. ingen aning..

------------------
the man with the golden bottle..

emissionMedlem sedan dec. 19996 721 inlägg

2 aug. 2001 10:25#6

WRAP bestämmer hur texten bryts i formuläret, men det har inget med detta att göra.

Du kan inte ha kvar din instr.

Hela din första kodsnutt ska ersättas med den @nders skrev.

tleeMedlem sedan mars 2001290 inlägg

2 aug. 2001 11:20#7

funkar inte.. jag klistrar in hela koden så ni kan kolla på den..

<html>
<head>
</head>
<!--#INCLUDE FILE="../inc/dbConn.inc"-->
<body>
<%

Set DB_QUERY = Connect.Execute("SELECT col_BigImage, col_Collection, col_Title, col_Text FROM tbl_Collection WHERE ID="& Request.Querystring("ID") &";")

I = cInt(0)
intCounter = cInt(1)

Response.Write("<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 WIDTH=600>")
%>
<TR>
<TD><B><% = UCase(DB_QUERY("col_Title"))  %></B>&nbsp;<br>
<HR noShade SIZE=1>
</TD>
</TR>
<TR>
<TD COLSPAN=5><%

'Response.Write(DB_QUERY("col_Text"))

if not isnull(DB_QUERY("col_Text")) then Response.Write Replace(DB_QUERY("col_Text"), vbCrLf,"<BR>")

%>
<BR>&nbsp;</td>
</TR>
</TABLE>
<TABLE width=600 cellpadding=3 cellspacing=3 border=0>

<%

Response.Write("<TR>")
Response.Write("<TD vAlign=top><IMG SRC='images/" & DB_QUERY("col_BigImage") & "' BORDER=0></TD>")
Response.Write("</TR>")		
Response.Write("</TABLE>")
Response.Write("</BODY>")
Response.Write("</HTML>")

DB_QUERY.Close
Connect.Close

%>

------------------
the man with the golden bottle..