Sammenligne 2 databaser

Jeg er ikke helt med på hvad det er du gerne vil ha en liste ud over...

For mig at se vil du kun ha en ting ud fra aden DB hvilket er serienumrerne, hvilke som jeg læser det allerede eksisterer i første DB

Jeg prøver lige igen, det er også lidt rodet.

DB1 inde holder x antal computere med software på. I denne DB står serie nummeret på det forskellige software der er installeret på maskinerne.

DB2 inde holder samtlige serie numre på programmer.

Dvs. der er flere serie numre i DB2 end der er i DB1 fordi det ikke er alle programmer der er indstalleret.

Det som jeg ogdt kunne tænke mig er at man tager Serie numrene fra DB1 (for eks. photoshop eller illustrator) og sammenligner med serienumrene fra DB2 (naturligvis samme program) så man får en liste over hvilke numre der er brugt og hvilke der ikke er brugt. Så når man skal installere en ny maskine er det nemt hurtigt at se hvilke numre der er ledige.

Je vil mene du skal lave forbindelsen til begge databaser som det første. Derefter trækker du alle serienumre fra db1 med en sql sætning og laver en loop hvori du laver en ny sql sætning der trækker serienumrene ud fra db2. På den måde kan du nu samligne numrenop mod hinanden og kun trække dem ud der ikke allerede er i brug.

/WebSam

Du kan jo oxo nøjes med at bruge en db og så tilføje et sandt/falskk felt og hvis feltet er vinket af skal serienummeret ikke trækkes ud da det er i brug, bare lige en anden ide ;o)

/WebSam

Du kan gøre det som følger:

strSQL = "SELECT serienummer FROM db1 ORDER BY serienummer ASC"
set rs = Conn.Execute(strSQL)

strSQL = "SELECT serienummer FROM db2 ORDER BY serienummer ASC"
set rs2 = Conn.Execute(strSQL)


while not rs2.EOF OR rs2.BOF

  if rs("serienummer") = rs2("serienummer") then

    rs.MoveNext
    rs2.MoveNext
    Wend

  else

  response.write rs("serienummer")
  rs.Movenext
  rs2.MoveNext
  Wend

  end if

sorry sådan her:

strSQL = "SELECT serienummer FROM db1 ORDER BY serienummer ASC"
set rs = Conn.Execute(strSQL)

strSQL = "SELECT serienummer FROM db2 ORDER BY serienummer ASC"
set rs2 = Conn.Execute(strSQL)


while not rs2.EOF OR rs2.BOF

  if rs("serienummer") = rs2("serienummer") then

    rs2.MoveNext
    Wend

  else

  response.write rs("serienummer")
  rs.Movenext
  rs2.MoveNext
  Wend

  end if

Jeg har ikke glemt dit svar, jeg har bare ikke lige haft tid til at rode med det.

Jeg er nok nød til at have lidt hjælp til at få det rigtigt placeret, jeg kan nogenlunde gennemskue hvordan det er skruet sammen, men lige at få det rigtigt placeret, er lidt værre. Har jeg ret i at:

strSQL = "SELECT serienummer FROM db1 ORDER BY serienummer ASC"
set rs = Conn.Execute(strSQL)

strSQL = "SELECT serienummer FROM db2 ORDER BY serienummer ASC"
set rs2 = Conn.Execute(strSQL)

Placeres i head'eren mellem <%%>
Og :
while not rs2.EOF OR rs2.BOF

  if rs("serienummer") = rs2("serienummer") then

    rs2.MoveNext
    Wend

  else

  response.write rs("serienummer")
  rs.Movenext
  rs2.MoveNext
  Wend

  end if
i bodyen, men hvor skal det præcist tag's med <%%>

Bare placer det hele i body......

Det eneste der betyder noget er at dine SQL-sætninger kommer inden løkken. Løkken plaveres der hvor du skal skrive ud, idet det netop er løkken der udskriver

jeg får en fejl i det er er linie 21 som min browser siger er den med Wend?

hvad er fejlen?

Microsoft VBScript compilation error '800a0400'

Expected statement

/sammen.asp, line 21

Wend
^

hmmm det lyder underligt

Jeg prøver lige at omdøbe mine db'er og tabeller, så de passer til scriptet!

Det bør virke i hvert fald

Det vil ikke, så jeg tror jeg vil prøve Websam's forslag med en sand/falsk istedet, jeg skal vist lige have det hele vendt igen, så jeg kan lave det smartest og mest overskueligt. Men du får point'ene for det ihærdige forsøg!