Søg
Avatar billede bobbedude Nybegynder
17. februar 2003 - 08:18 Der er 20 kommentarer og
1 løsning

Hvordan gør man lige det ?

Jeg har en liste med nogle kommuner ca 275 stk.

Det man gør er at oprette et hold også skal man kunne tilføje disse kommuner via en klik boks.

Men hvodan gør jeg når jeg skal sætte dem ind ?

jeg ville have IDerne fra kommune rækken sat in sådan 1,2,3,4,5,6,7,8,9

Det kan jeg egentligt godt lave, men hvordan kan jeg loope og skrive de poster ud der står i kommune.

Jeg mener det kunne laves med et array.
Avatar billede wiesemarc Nybegynder
17. februar 2003 - 08:28 #1
Mener du sådanne noget med nogle Dropdown's ??
Avatar billede bobbedude Nybegynder
17. februar 2003 - 08:46 #2
nej jeg har fået det lavet så når man vælger nogle kommuner smider scriptet det in i databasen sådan 1, 3, 4, 8, 10, 13

Det jeg så ikke kan finde ud af er hvordan jeg på en anden side viser de kommuner der er valgt, jeg mener man kan lave det med et Array som skal splittes men jeg kan ikke rigtig få det til at virke.
Avatar billede somaliomar Praktikant
17. februar 2003 - 08:50 #3
Hvordan ser din kode?
Avatar billede wiesemarc Nybegynder
17. februar 2003 - 08:51 #4
Dim liste, arrB
  liste = "a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z,æ,ø,å"
  arrB = Split(liste,",")
  intCount = UBound(ArrB) + 1
  Response.write("Der er " & intCount & " poster")
  t=0

Do Until t = intCount
    Response.Write "" & arrb(t) & ","
    t = t + 1
Loop


Kan dette bruges..
Avatar billede wiesemarc Nybegynder
17. februar 2003 - 08:53 #5
Du skal bare i liste Lave et loop, med tallene og så putte den ind der...
Avatar billede bobbedude Nybegynder
17. februar 2003 - 09:07 #6
her laver jeg listen og sætter tingene in i databasen


<%
set connect = server.createobject("ADODB.Connection")
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("db/regioner.mdb")
%>
<html>
<head>
<title>Tilføj Kommuner</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
<form name="form1" method="post" action="kommuner.asp?opdater=ok">
<table width="400" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td>Kommune
      <input name="holdID" type="hidden" value="<%=request.querystring("holdID")%>"></td>
    <td>V&aelig;lg</td>
  </tr>
<%
set rs = connect.Execute("Select * FROM kommuner Order by kommuneID ASC")
if not rs.EOF then
Do until rs.EOF
%>
  <tr>
    <td><%=rs("komnavn")%></td>
    <td><input type="checkbox" name="kommuner" value="<%=rs("kommuneID")%>"></td>
  </tr>
<%
        rs.MoveNext
        Loop
        else
        response.write "Ingen hold oprettet"
        end if
%>
</table>
<br>
<input type="submit" name="Submit" value="  Vælg  ">
</form>
</body>
</html>
<%
If request.querystring("opdater") = "ok" then

SQL = "Update microhold set kommuner= '" & request.form("kommuner") & "' "
SQL = SQL & " WHERE holdID= "& request.form("holdID")
Connect.Execute(SQL)

end if
%>



Det giver så en streng i kommuner hvor der står 1, 3, 4, 8, 10, 13 (det er IDerne fra kommune listen)

så vil jeg have lavet en side hvor jeg kunne vise de kommuner der er valgt.
Avatar billede bobbedude Nybegynder
17. februar 2003 - 09:09 #7
Det er loopet der tager IDerne fra 1, 3, 4, 8, 10, 13 og viser dem jeg ikke kan lave.
Avatar billede wiesemarc Nybegynder
17. februar 2003 - 09:10 #8
Okay... Kunne du ikke bruge det forslag jeg kom med ??
Avatar billede wiesemarc Nybegynder
17. februar 2003 - 09:14 #9
Dim liste, arrB
  liste = byer
  arrB = Split(liste,",")
  intCount = UBound(ArrB) + 1
  Response.write("Der er " & intCount & " poster")
  t=0

Do Until t = intCount
    Response.Write "" & arrb(t) & ","
    t = t + 1
Loop

Function Byer
    Do Until t = intCount
        Response.Write "" & rs("komnavn") & ","
        t = t + 1
    Loop
End Function

Jeg ville mene at denne fungere....
Avatar billede wiesemarc Nybegynder
17. februar 2003 - 09:15 #10
Husk lige denne SQL sætning...

set rs = connect.Execute("Select * FROM kommuner Order by kommuneID ASC")
if not rs.EOF then
Do until rs.EOF
Avatar billede bobbedude Nybegynder
17. februar 2003 - 09:15 #11
wiesemarc >> ikke lige so jeg ser det for den liste du viser fortæller jo bare hvor mange elementer der er i det Array, jeg vil have den til at Vise posterne i en databse hvor de IDer der er i Arrayet er = dem der er i databasen.

Håber du forstår mig, det er jo mandag hehe
Avatar billede wiesemarc Nybegynder
17. februar 2003 - 09:16 #12
Undskylder.. Functionen var lidt forkert.. Er rettet nu...

Function Byer
    Do until rs.EOF
        Response.Write "" & rs("komnavn") & ","
    Loop
End Function
Avatar billede wiesemarc Nybegynder
17. februar 2003 - 09:17 #13
Så skal rs("komnavn") bare være rs("id")...

Er det tal eller navnet du vil have i den...
Avatar billede bobbedude Nybegynder
17. februar 2003 - 09:25 #14
wiesemarc >> Skal der ikke være en Select et sted ??
Avatar billede wiesemarc Nybegynder
17. februar 2003 - 09:28 #15
Okay.. Du vil have sådanne en...

<select name="etellerandet">
<%
  Do until rs.EOF
      response.write "<option value=''>" && "</option>" & vbCrLf
  Loop
%>
</select>
Avatar billede wiesemarc Nybegynder
17. februar 2003 - 09:30 #16
<select name="etellerandet">
<%
  Do until rs.EOF
      response.write "<option value='" & TIL ID & "'>" & TIL NAVN & "</option>" & vbCrLf
  Loop
%>
</select>

Fare vildt meget rundt i koderne lige nu... Men som du skrev er det jo også mandag igen.... ØVVVVV..
Avatar billede bobbedude Nybegynder
17. februar 2003 - 09:34 #17
hehe oki jeg laver lige et test script og ser hvordan det går
Avatar billede wiesemarc Nybegynder
17. februar 2003 - 09:39 #18
Okay.... Håber det fungere... Hvis ikke må jeg bare prøve noget andet...
Avatar billede bobbedude Nybegynder
17. februar 2003 - 09:46 #19
Ahm damid jeg er helt gået i stå her.

Jeg har en TABEL der hedder microhold den indeholder
kommuner som er et tekst felt her står der 1, 3, 4, 8, 10, 13

En anden TABEL som hedder kommuner som indeholder
kommuneID som er = de tal der står i TABELLEN microhold

Så vil jeg have en side som man kan kalde med et ID og IDet = holdID fra TABELLEN microhold

Jeg vil så have listet de kommuner fra TABELLEN kommuner hvor IDet = det der står i TABELLEN microhold i feltet kommuner.

I hate monday's
Avatar billede wiesemarc Nybegynder
17. februar 2003 - 09:49 #20
Me Too... :o)

Bruger du MSN ???
Avatar billede bobbedude Nybegynder
17. februar 2003 - 09:50 #21
jo sporgejorgen@hotmail.com
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
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Persits.Upload Af bsn i ASP 9 17/09/202611:37 21/09/202615:15
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 10 25/06/202622:20 04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP 4 18/05/202601:57 19/05/202613:33
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
43 min siden Nomad Tracking Car Af fleknes i Apps til Android
25/0916:15 Internet forsvinder hele tiden Af TTA i Internetforbindelser
23/0920:49 Fejl på Tv2 Play Af Bukse i Browsere
23/0918:11 VB, Lægge 2 celler sammen og skrive den i cellen ved side af Af MC3390 i Excel
21/0910:39 DBA er ikke hvad det tidligere var - desværre! Af ErikHg i Fri debat
White papers
Flere white papers »