Slå ihop 2st frågor

Är seg i huvudet i dag så jag tänkte be er om lite hjälp att slå ihop dom här två frågorna till en, mot Access.

strSql = "select count(*) as intTemp from (SELECT DISTINCT ip FROM hits) hits"
strSql = "select * from hits"

Fråga är tänkt att användas så här.

'# open database
Set objConn = Server.CreateObject("ADODB.Connection")  
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("statsdb.mdb")

	'# create recorset
	Set objRs = Server.CreateObject("ADODB.Recordset")
	[B]strSql = ???[/B] 
	objRs.Open strSql, objConn, adOpenStatic, adLockOptimistic

	intUnik = objRS("intTemp")
	arrRs = objRs.GetRows()
		
'# closse database & recordset
objRs.Close: Set objRs = nothing
objConn.Close: Set objConn = nothing

Tack på förhand.

Nu när inte LarsG svarar kan ju jag ändå testa. ;)

strSql = "select count(*) as intTemp, (select * from hits) from (SELECT DISTINCT ip FROM hits) hits"

Men nu kommer väl Lasse och skäller på mig som vanligt. :OO

strSql = "select hits.*, (select count(*) from (SELECT DISTINCT ip FROM hits)) as intTemp from hits"

Tack Sebbe för att du försökte, men jag fick inte din fråga att fungera. :)

...och som vanligt tack LarsG, vad skulle vi göra utan dig. :bire