/ Forside / Teknologi / Udvikling / ASP / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
ASP
#NavnPoint
smorch 9259
Harlekin 1866
molokyle 1040
Steffanst.. 758
gandalf 657
smilly 564
gibson 560
cumano 530
MouseKeep.. 480
10  Random 410
Sætte størrelse på array ud fra
Fra : SpookiePower


Dato : 23-11-07 13:02

Jeg har et array som fast er sat til at indeholde
30 "pladser". Det som skal fyldes i array'et kommer
fra et recordset, og engang imellem kan dette recordset
ikke udfylde 30 pladser. Så hvordan jeg sætter størrelsen
ud fra recordset'et er jeg itvivl om. Jeg ved at jeg skal
have fat i et dynamisk array og bruge Redim. Mit egen ide
var -

dim navnArray
redim navnArray(størrelse på recordset'et)

Kan i hjælpe mig med at finde størrelsen på recordset'et ?

 
 
Jørn Andersen (24-11-2007)
Kommentar
Fra : Jørn Andersen


Dato : 24-11-07 01:58

On Fri, 23 Nov 2007 13:02:20 +0100, SpookiePower <boxjunk2600@gmail.com>
wrote:

>Jeg har et array som fast er sat til at indeholde
>30 "pladser". Det som skal fyldes i array'et kommer
>fra et recordset, og engang imellem kan dette recordset
>ikke udfylde 30 pladser. Så hvordan jeg sætter størrelsen
>ud fra recordset'et er jeg itvivl om. Jeg ved at jeg skal
>have fat i et dynamisk array og bruge Redim. Mit egen ide
>var -
>
>dim navnArray
>redim navnArray(størrelse på recordset'et)
>
>Kan i hjælpe mig med at finde størrelsen på recordset'et ?

Hvis du har sat den rigtige CursorType:
intRows = objRs.RecordCount

Men egentlig vil jeg forslå, at du bruger recordsettet .GetRows-metode:
Dim arrMyArray
arrMyArray = objRs.GetRows
- så får du lige netop et array i den størrelse, som antal records og
felter tilsiger.

Du kan så hente antal records og felter ved at måle arrayets
dimensioner:
intCols = UBound(arrMyArray, 1) + 1
intRows = UBound(arrMyArray, 2) + 1
(+ 1, fordi arrays er nul-nummererede)

Good luck!

--
Jørn Andersen,
Brønshøj

SpookiePower (26-11-2007)
Kommentar
Fra : SpookiePower


Dato : 26-11-07 12:47

Jørn Andersen wrote:

> Hvis du har sat den rigtige CursorType:
> intRows = objRs.RecordCount

Hvilken er den rigtige cursortype her, det er jeg itivil om ?


> Men egentlig vil jeg forslå, at du bruger recordsettet .GetRows-metode:
> Dim arrMyArray
> arrMyArray = objRs.GetRows
> - så får du lige netop et array i den størrelse, som antal records og
> felter tilsiger.
>
> Du kan så hente antal records og felter ved at måle arrayets
> dimensioner:
> intCols = UBound(arrMyArray, 1) + 1
> intRows = UBound(arrMyArray, 2) + 1
> (+ 1, fordi arrays er nul-nummererede)

Mange tak. Det vil jeg kigge nærmere på.

Søg
Reklame
Statistik
Spørgsmål : 177558
Tips : 31968
Nyheder : 719565
Indlæg : 6408917
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste