Fråga : Hur man Query samma bordlägga två gånger using 1 SQL-Query?

Jag önskar att göra en Query var jag går i stort following
Where tillbaka villkorar 1 och 2 och 3 matchar, går en värdera av 0
OR tillbaka, var villkora 1 ELLER 2 ELLER 3 matchar, går en värdera av 1

Basically tillbaka, om jag finner en avkräva - matchen av data som innehålls inom separata 3, sätter in, mig önskar att gå datan tillbaka, såväl som en VÄRDERA AV 0 i ett extra sätter in eg. FieldSort.
Also, om jag finner en match i NÅGON 1, eller 2 av 3na sätter in, (en partisk match) jag önskar att gå datan tillbaka, såväl som en VÄRDERA AV 1 i ett extra sätter in eg. FieldSort.

And sorterar därefter på FieldSorten sätter in - så att NÅGOT REKORD med en avkräva - matchen ska visas upptill av bordlägga, och den partiska förmiddagen för matcher below.

I using multipel bordlägger, som man bordlägger håll bemannar specificerar, ett annat deras arbete specificerar, och en andra deras tilltalar specificerar. ALLT bordlägger anknytas via en EmployeeID Table

eg.
tblStaffDets som (tSD)
Field1 = EmployeeID
Field2 = Surname
Field3 = GivenName
Field4 = BirthDate
Field5 = Gender

tblHomeDets som (tHD)
Field1 = EmployeeID
Field2 = Address
Field3 = PostCode

tblWorkDets som (tWD)
Field1 = EmployeeID
Field2 = PositionTitle
Field3 = WorkAddress
Field3 = WorkPostCode

I önskar att gå efter Fields
tSD.EmployeeID
tSD.Surname
tSD.GivenName
tSD.BirthDate
tSD.Gender
tHD.Address
tHD.PostCode
tWD.PositionTitle
tWD.WorkAddress
tWD.WorkPostCode
SortID

SortID = 0, var en avkräva - matcha, SortID = 1, var en partisk matchoccurs

Am för närvarande Using ms-Access 2000 som en Backend DB (kodifiera emellertid ska också används i Delphi för att köra

Help för queryen) skulle är väldeliga appreciated. " klar "

Svar : Hur man Query samma bordlägga två gånger using 1 SQL-Query?

Därefter morgonen, efter snittet har daterat av, kör denna skrivar, och den ska läste texten sparar och inaktiverar kontona.

Hälsningar,

Råna.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:

Fastställd objFSO = CreateObject (”Scripting.FileSystemObject”)
Const som intForReading = 1
Const som intForAppending = 8
strDisableAccountsFile = ”\ \ serverxx \ spårning \ UsersToDisable.txt”,
strDisabledReportFile = ”\ \ serverxx \ spårning \ DisabledUsers.txt”,
Fastställd objOutput = objFSO.OpenTextFile (strDisabledReportFile, intForAppending som är riktig)
Fastställdt objFile = objFSO.OpenTextFile (strDisableAccountsFile, intForReading som är riktig)
Stunder inte objFile.AtEndOfStream
	strUserDN = objFile.ReadLine
	Om "" för klippning (strUserDN <> ) därefter
		Fastställd objUser = GetObject (”LDAP: /” & strUserDN)
		objUser.AccountDisabled = True
		objUser.SetInfo
		Fastställd objUser = ingenting
		objOutput.WriteLine-strUserDN
	Avsluta om
Wend
objFile.Close
objOutput.Close
Fastställdt objFile = ingenting
Fastställd objOutput = ingenting
Fastställdt objFile = objFSO.CreateTextFile (strDisableAccountsFile, riktigt)
objFile.Close
Fastställdt objFile = ingenting
MsgBox ”konton, som har varit rörelsehindrada har varit skriftlig”, & VbCrLf & strDisabledReportsFile & VbCrLf & ”och spara av användare till disalbe har görats klar” & strDisableAccountsFile
Andra lösningar  
 
programming4us programming4us