Tælle array

antal = Ubound(DitArray) + 1

hmm.. Jeg kan ikke helt få det til at virke..

    Function SendSMS()
      Modtager = Split(Replace(Request.Form(\"Modtager\"), \" \", \"\"), \",\")
      Afsender = Request.Form(\"Afsender\")
      Besked = Request.Form(\"Besked\")
      Response.Write \"<p><font face=\"\"verdana\"\" size=\"\"2\"\">Din SMS er sendt til følgende numre:<br>\"
      For I = 0 To UBound(Modtager)
        Response.Write Modtager(I) & \"<br>\"
      Next
      Response.Write \"</font></p>\"
\'      For I = 1 To Antal Step 1
\'        Set MailObj = Server.CreateObject(\"CDONTS.NewMail\")
\'        MailObj.From = Afsender
\'        MailObj.To = Email(Modtager)
\'        MailObj.Subject = \"\"
\'        MailObj.Body = Besked
\'        MailObj.Send
\'        Set MailObj = Nothing
\'      Next
  End Function

Jeg vil have den til at skrive alle modtagerne..

      For I = 0 To Ubound(Modtager)
        Set MailObj = Server.CreateObject(\"CDONTS.NewMail\")
        MailObj.From = Afsender
        MailObj.To = Email(Modtager)
        MailObj.Subject = \"\"
        MailObj.Body = Besked
        MailObj.Send
        Set MailObj = Nothing
      Next

Upss

MailObj.To = Email(Modtager(i))

Jeg kan stadig ikke helt få det til at virke..

Hvis jeg debugger den v.h.a Response.Write UBound(Modtager) så siger den -1!?!

Hvad indeholder Request.Form(\"Modtager\")?
Det samme som du forventer?

Request.Form(\"Modtager\") indeholder en samling mobilnumre (xxxxxxxx, xxxxxxxx, xxxxxxxx)..

Hvis Modtager har en Ubound() på -1, så indeholder det ikke en liste af mobilnumre. Dvs. at Request.Form(\"Modtager) er tom = Empty eller \"\".

Hvis jeg skriver Modtager = Split(Request.Form(\"Modtager\"), \",\")
Og hvis jeg så skriver Response.Write Modtager(0) så skriver den det første nummer!

Så er UBound(Modtager) >= 0

Og hvis jeg skriver Modtager(3), så skriver den det 4. nummer i rækken.. Men jeg kan ikke få det der Ubound() til at virke..

Der er noget som absolut IKKE stemmer.

Dette er korrekt:
Modtager = Split(\"a,b,c\",\",\")
Ubound(Modtager) er lig med 2

Hvis Modtager(3) giver noget fornuftigt, så er Ubound(Modtager) >= 3 i Linjen efter. Det er 100%.

jeg kunne slet ikke få det til at stemme, så jeg har droppet det..  men ellers tak for hjælpen..  :)