Maks længde af tekst ?

Ups eksperten brækker det heller ikke i små bider, men kan det lade sig gøre ?

ser lige med, jeg har nemlig smame problem :)

jeg har set den her function her på eksperten som kan gøre det:

Function ParseString(ByVal String)
intCount = 1
Do While intCount <= Len(String)
    strCount = strCount + 1
                If strCount = 50 Then
                    New_String = New_String & "<br>" & Mid(String, intCount, 1)
                  strCount = 0
                Else
                    New_String = New_String & Mid(String, intCount, 1)
                End If
        intCount = intCount + 1
    Loop
    ParseString = New_String
End Function

-- xs

jeg får

Der opstod en Microsoft VBScript-kompileringsfejl fejl '800a03ea'

Der er en syntaksfejl

/senyhed.asp, linje 54

Function ParseString(ByVal String)
^

jeg har aldrig set det være løst - så jeg tvivler på at det kan lade sig gøre...

men virker ovenstående kode glæder jeg mig da til at høre om det :)

virker fint for mig:

<%
Function ParseString(ByVal String)
intCount = 1
Do While intCount <= Len(String)
    strCount = strCount + 1
                If strCount = 50 Then
                    New_String = New_String & "<br>" & Mid(String, intCount, 1)
                  strCount = 0
                Else
                    New_String = New_String & Mid(String, intCount, 1)
                End If
        intCount = intCount + 1
    Loop
    ParseString = New_String
    response.write ParseString
End Function

newString = "lkdjfjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjj"

ParseString(newString)
%>

tilføjet response.write i funktionen..

-- xs

Funktionen splitter strengen op i bidder af 50 tegn, hvis du ikke vidste det...

-- xs

hvis du bruger OPTION EXPLICIT skal du huske at Dim de variabler dr bliver brugt

det kan jeg skam godt se :)

men hvad nu hvis strengen ikke er ét lang ord - men en masse små? risikerer man så ikke med denne at der bliver delt midt i et ord man ikke ønsker delt og hvor det vil være irrelevant?

er scriptet til java eller VB

keyser: jep, det har du ret i.  Så kunne man prøve at finde et mellemrum mellem 40-50 tegn og
erstatte det med et <BR> istedet for

mranders.dk: det er VBScript

Der er en syntaksfejl

/senyhed.asp, linje 54

Function ParseString(ByVal String)
^

ved du hvorfor den siger syntaksfejl ved funktion

bruger du option explicit?

du bruger vbscript i din kode ikke?

ved ikke hvad option explicit er

ok
option explicit betyder at du skal "fortælle" sciptet hvilke variabler du kommer til at bruge i dit script..:
f.eks:
Dim newString, ParseString, intCount osv osv osv

kan du se om det står i din kode øverst oppe?

det er måske nemmere hvis du viser os koden. kan du ikke poste det her?

ok, jeg jeg behøves ikke at fortælle mine variabler, for alle mine andre variabler dur

hvilken variabel er det som den deler, hvilken en skal jeg kalde min "lange tekst" ?

Lytter lige med, men kom der overhovedet noget svar på spørgsmålet?

ja ok det har jeg gennemskuet

men den kan ikke rigtigt lide den der funktion

mrandersdk: det er nemmere hvis du viser os koden

steen_hansen: svar?

scriptet dur når jeg kører det på en ny side når der ikke står andet kode på siden, men jeg kan ikke få det til at du på min anden side

har fået det til at du tak

jeg kan ikke finde ud af hvad der er galt medmindre jeg kan se resten af koden på den side.. :)

ok, så lidt

-- xs