Avatar billede tblaster Nybegynder
28. oktober 2003 - 11:25 Der er 20 kommentarer og
2 løsninger

Split funktion

Jeg har en række tal i en variabel:
Tal = 1-7-7-2-7-2

Hvordan kan jeg med en split funktion ende med kun at stå med hver tal en gang altså:

1 og 7 og 2 ... rækkefølgen er ligemeget.

Det er forskelligt hvilke tal jeg har i min variabel.
Avatar billede mnoer Nybegynder
28. oktober 2003 - 11:44 #1
Avatar billede mnoer Nybegynder
28. oktober 2003 - 11:46 #2
.. split(Tal,"-")
Avatar billede tblaster Nybegynder
28. oktober 2003 - 11:51 #3
Hvordan benyttes compare funktionen?
Avatar billede mnoer Nybegynder
28. oktober 2003 - 11:55 #4
ved det ikke helt, men det er ikke noget du behøver..
Avatar billede tblaster Nybegynder
28. oktober 2003 - 11:57 #5
Hvordan vil du så sikre at jeg kun ender med at stå med de tal der er forskellige fra hinanden? ALtså 1, 7 og 2 ...
Avatar billede mnoer Nybegynder
28. oktober 2003 - 11:57 #6
Tal = "1-7-7-2-7-2"
Tal = Split(Tal, "-")
Response.Write(Tal)

gør det ikke det du vil?
Avatar billede mnoer Nybegynder
28. oktober 2003 - 11:59 #7
ahh ok.. så er det ikke nok nej.
havde ikke helt forstået det di ville.
Avatar billede mnoer Nybegynder
28. oktober 2003 - 12:00 #8
di=du
Avatar billede mnoer Nybegynder
28. oktober 2003 - 12:00 #9
jeg er i skole nu, kigger på det når jeg kommer hjem.. hvis du ikke har fået svaret inden da.
Avatar billede hossein Nybegynder
28. oktober 2003 - 14:12 #10
Du skal bruge to løkker ind i hinanden noget i den retning:
Function IngenDub(minArray)
    dim Samlignarray, j, i, l
    Samlignarray = minArray
    for j = 0 to ubound(Samlignarray)
        l = 0
        for i = 0 to ubound(Samlignarray)
            if Samlignarray(i) = Samlignarray(j) then l = l + 1
            if l > 1 then
                IngenDub = True
                Exit function
            end if
        next
    next
    IngenDub = False
End Function

<%
response.write IngenDub(tal) ' og tal er: Tal = (1,7,7,2,7,2) brug replace for at ændre - til ,
%>
Avatar billede mnoer Nybegynder
28. oktober 2003 - 14:18 #11
<%
Str = "1-2-5-3-7-5-5-2-8-2-3"
Response.Write("Str = "&Str&"<br>")
arr = Split(Str, "-")

For i = lbound(arr) To ubound(arr)
    If InStr(Str1, ""&arr(i)&"") Then
    else
        Str1 = Str1&" "&arr(i)
    end if
Next
Response.Write(Str1)
%>
Avatar billede mnoer Nybegynder
28. oktober 2003 - 14:19 #12
kunne ikke få If Not InStr(Str1.......... til at virke, ved ikke hvorfor men det der virker.
Avatar billede tblaster Nybegynder
29. oktober 2003 - 13:50 #13
Mnoer ... jeg har prøvet med følgende men kan ikke helt få det til at virke:
                            RID_arr = Split(Session("Tid-" & (StartTime) * 100 + Minute(Interval)+y*Interval & ""), "-")
                            For i = lbound(RID_arr) To ubound(RID_arr)
                                If InStr(db_RessourceID, "-" & RID_arr(i) & "-") Then
                                Else
                                    RessourceID = RessourceID & "-" & RID_arr(i)
                                End if
                            Next
Avatar billede tblaster Nybegynder
29. oktober 2003 - 13:52 #14
hossein ... jeg kan ikke lige få din ændre så den kan køre med det jeg skal have. Jeg har jeg 2 tal strenge hvor jeg deler den ene op og checker om talne ligger i den anden.
Avatar billede mnoer Nybegynder
29. oktober 2003 - 14:03 #15
hvor mange talrækker har du?
Avatar billede mnoer Nybegynder
29. oktober 2003 - 14:08 #16
Prøv det her:
RID_arr = Split(Session("Tid-" & (StartTime) * 100 + Minute(Interval)+y*Interval & ""), "-")
For i = lbound(RID_arr) To ubound(RID_arr)
    If InStr(RessourceID, "-" & RID_arr(i) & "-") Then
    Else
        RessourceID = RessourceID & "-" & RID_arr(i)
    End if
Next
Avatar billede tblaster Nybegynder
29. oktober 2003 - 15:06 #17
jeg har 2 tal rækker ...
Avatar billede mnoer Nybegynder
29. oktober 2003 - 15:09 #18
ok, i dit spørgsmål nævnte du kun en talrække... hvad er det skal kunne?
fjerne dubletter fra de 2 strænge?
Avatar billede hossein Nybegynder
31. oktober 2003 - 09:36 #19
trækker du tallene ud fra en tabel (i DB)? hvis ja, så bedste måde er at lade sql sætning gøre det for dig i stedet for en funktion, da det giver også en bedre performance.
Avatar billede tblaster Nybegynder
31. oktober 2003 - 09:44 #20
nope de kommer ikke fra en db
Avatar billede hossein Nybegynder
31. oktober 2003 - 10:01 #21
Nu skal du fortale, hvad har du gang i :)
Du har 1. array med tallene fx: 1,2,2,7,7 og den skal blive til 1,2,7
Du har 2. array med tallene fx: 1,2,2,9,3 og den skal blive til 1,2,9,3

resultatat som du vil er: 1,2,9,3,7

er det korrekt?
Avatar billede tblaster Nybegynder
04. november 2003 - 14:11 #22
Fik det til at virke!
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