antal elementer i et array

UBOUND( navnetPåDinArray )

/nute

Gracias!

anytime :-)

Åbner en ; separeret textfil, laver et array, ---´> smider det i en base!

Har du et lille fif til hvordan man optimerer (hastighedsmæssigt) ?

det er en så \"liten\" operasjon, at det er ikke så mye å spare uansett hvordan man implementerer det.

/nute

skal nok smide points efter det!

der er ca. 30000 elementer i arrayet, så der er nok lidt at spare, hvis man gør det korrekt

lige nu tager det ca. 20 - 25 sekunder, ville gerne have det ned på 10 - 15 :)

jeg smider lige lidt kode, så kan du altid komme med et forslag - hvis du har lyst:)

i = 0
        do while i < UBOUND(MyArray)
        a_a = replace(MyArray(i+0),vbcrlf,\"\")
        b_a =replace(MyArray(i+1),vbcrlf,\"\")
        c_a = replace(MyArray(i+2),vbcrlf,\"\")
        d_a = replace(MyArray(i+3),vbcrlf,\"\")
        e_a  = replace(MyArray(i+4),vbcrlf,\"\")
        f_a = replace(MyArray(i+5),vbcrlf,\"\")
        g_a =  replace(MyArray(i+6),vbcrlf,\"\")
        h_a = replace(MyArray(i+7),vbcrlf,\"\")
        i_a = replace(MyArray(i+8),vbcrlf,\"\")
        j_a = replace(MyArray(i+9),vbcrlf,\"\")
        k_a = replace(MyArray(i+10),vbcrlf,\"\")
        l_a = replace(MyArray(i+11),vbcrlf,\"\")
           
            sql = \"insert into abb_varer (nummer,navn1,navn2,enhed,salgspris,engrospris,konceptpris,leveringshastighed,varegruppe,beholdning,farver,stoerrelser,regioner) values (\'\"&a_a&\"\',\'-\',\'\"&b_a&\"\',\'\"&c_a&\"\',\'\"&d_a&\"\',\'\"&e_a&\"\',\'\"&f_a&\"\',\'\"&g_a&\"\',\'\"&h_a&\"\',\'\"&i_a&\"\',\'\"&j_a&\"\',\'\"&k_a&\"\',\'\"&l_a&\"\')\"
            conn.execute(sql)
            set sql = nothing
        i = i + 12
        loop

du kan jo bare parse filen direkte *uten* å legge den om til en array...hmmm....du kan jo prøve:

<%
str = \"din semikolonseparerte fil\"
strLen = LEN( str )
startIndex = 1
stopIndex = -1

function addToDatabase( str )
  if( stopIndex < strLen ) then
    stopIndex = InStr( startIndex, str, \";\" )
    SQL = \"INSERT INTO tabel (blabla) VALUES (\'\" & MID( startIndex, str, stopIndex ) & \"\'\"
    startIndex = stopIndex
  end if

end function
%>

kan du koble den kode inn i din egen ? forstår du hva jeg mener ?

Jeg ved godt hvad du mener, --->
Men det er bare med at holde tungen lige i munden --> jeg valgte egentlig arrayet, da jeg synes det var lettere at hådtere i sin egen funktion, -> dvs. jeg har 20 forskellige text filer der alle skal splittes op --> så hvorfor ikke spare lidt arbejde:)

Jeg siger tak for forslaget, points i et nyligt oprettet spgmv i samme kat.

tror at det er lettere aútomatisk genere det kode jeg har lavet, men det er meget Kool at springe arrayet over:)

jeg ville også sagt at det er mer håndterlig å benytte en array til det. Når man tenker seg om, så er det jo ikke så forferdelig å bruke 20-30 sekunder på 30000 \"entries\". Ting tar litt tid :-)

Jeg ville bare gi deg en liten idé om hvordan det kanskje kunne løses, og du kanskje kunne finne en brukbar måte å implementere det på. Jeg ville umiddelbart tro at det sparte *litt* tid iogmed at man springer arrayet over....men det er ikke noe jeg har testet, så jeg vet ikke om det ville fungert...

/nute