Avatar billede vange_inet Nybegynder
14. maj 2000 - 17:26 Der er 7 kommentarer og
1 løsning

Variabel-værdi

Jeg er i vildrede og mangler hjælp!!!

Hvis jeg "un-commenter" linie (1) udskrives værdien af subValue. Hvis jeg "uncommenter" linie (2) udskrives ikke noget - og jeg ved at aValue indeholder en værdi.

Function replaceCrLf(aValue)
DIM subValue
set subValue = aValue
' (1) response.write(subValue)
    if (subValue=Null) or (subValue="") then
        set replaceCrLf = ""
    else
' (2) response.write(subValue)
'        set subValue = replace (subValue, vbCrLf, "<br>")
        set replaceCrLf = subValue
    end if
End Function

ASP/VBScript er ved at drive mig til vanvid...
Avatar billede ortrak Nybegynder
14. maj 2000 - 17:44 #1
Function replaceCrLf(aValue)
subValue = aValue
response.write(subValue)
    if (IsNull(subValue)) or (subValue="") then
        set replaceCrLf = ""
    else
response.write(subValue)
subValue = replace(subValue, vbCrLf, "<br>")
        replaceCrLf = subValue
    end if
End Function
Avatar billede ortrak Nybegynder
14. maj 2000 - 17:45 #2
og igen...


Function replaceCrLf(aValue)
subValue = aValue
response.write(subValue)
    if (IsNull(subValue)) or (subValue="") then
        replaceCrLf = ""
    else
response.write(subValue)
subValue = replace(subValue, vbCrLf, "<br>")
        replaceCrLf = subValue
    end if
End Function


/ortrak
Avatar billede ortrak Nybegynder
14. maj 2000 - 17:46 #3
glemte at skrive DIM subValue . Men det er sådan set ligemeget, det er op til dig..


/ortrak
Avatar billede vange_inet Nybegynder
14. maj 2000 - 18:03 #4
Mine store problemer er:

1 - Linie (1) un-commented: Udskriver en værid, MEN bliver fanget af if isNull... osv..

2 - Linie (2) un-commented: Udskriver ikke en værdi, men går ned ved replace-kaldet: runtime error '800a005e' Invalid use of Null: 'replace'

Avatar billede ortrak Nybegynder
14. maj 2000 - 20:00 #5
har du prøvet den kode jeg skrev??
Den skulle virke efter hensigten...


/ortrak
Avatar billede philiph Nybegynder
15. maj 2000 - 01:50 #6
Hmm, Ortrak har ret i at du skal bruge IsNull(subValue) og ikke subValue=Null, men det er vist ikke problemet.

I den originale kode skriver du:

set subValue = aValue

hvoraf jeg så udleder at du kalder replaceCrLf med et objekt og ikke en strengværdi (variant) som ortrak's kode går ud fra. Prøv at bruge hans kode, og så i kaldet aflever strengværdien, og ikke objektet. Hvis du bruger et ADO databaselfelt gøres det med: fld.Value, eller du kan bruge CStr() funktionen.

Philip
Avatar billede vange_inet Nybegynder
15. maj 2000 - 14:18 #7
Philiph: hvad mener du med, at jeg skal aflevere strengværdien og ikke objektet? .value?
Avatar billede sone Nybegynder
15. maj 2000 - 14:24 #8
Den korte version:

Function replaceCrLf(aValue)
  replaceCrLf = replace(aValue&"", vbCrLf, "<br>")
End Function
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester