Du kan hente fra begge tabeller i samme SQL sætning ved at lave en JOIN.
SQL = "select tabel1.antal as t1antal, tabel2.antal as t2antal from tabel1 left join tabel2 on tabel1.id=tabel2.id where tabel1.id="&idlist
Så kan du tjekke som t2antal er Null og så lade være med at trække fra. og så rette din if sætning:
udregning = rs("t1antal") if not isNull(rs("t2antal")) then udregning = udregning - rs("t2antal") if udregning = "1" then .. . .... . . .
Alternativt kan man lave udregningen i SQL sætningen men hvis antal i tabel2 er tom vil udringen også give en tom tilbage og ikke tallet i tabel1. Så man må putte en IIF (Access) ind i SQL sætningen som tjekker om tabel2 er tom og hvis den er ligger et 0 ind.
Eks på SQL sætningen:
SQL = "select (tabel1.antal-IIf(IsNull(tabel2.antal), 0, tabel2.antal)) as antal from tabel1 left join tabel2 on tabel1.id = tabel2.id where tabel1.id="&idlist
Den where del du bruger til at lave de to recordset tabel1 og tavel2 i koden fra spørgsmålet kan bruges i den nye SQL sætning så den tager de samme med.
hvis de to SQL sætningener til tabel1 og tabel2 ser sådan her: SQL_tabel1 = "select * from tabel1 where id in (1,4,6,8,11,24)" SQL_tabel2 = "select * from tabel2 where id in (1,4,6,8,11,24)"
Så kan den nye SQL sætning se sådan her ud:
SQL = "select tabel1.antal as t1antal, tabel2.antal as t2antal from tabel1 left join tabel2 on tabel1.id=tabel2.id where tabel1.id in (1,4,6,8,11,24)"
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.