LarsG, en sissta sak ser du någe korkat i denna kod
SQLStmt = "SELECT * FROM (News n INNER JOIN NewsContent nc on nc.NewsId = n.NewsId) "_
& "INNER JOIN SortOrder l ON nc.NewsLanguageid = l.NewsLanguageId WHERE nc.NewsId "_
& "NOT IN (SELECT NewsId FROM NewsContent WHERE NewsLanguageid IN "_
& "(SELECT NewsLanguageId FROM SortOrder WHERE Sortorder < l.Sortorder)) ORDER BY SortOrder"
Response.Write"<br>"
ArrRS = Connect.Execute(SQLStmt).getrows()
For i = 0 to ubound(ArrRS,2)
if Cstr(language) <> Cstr(ArrRS(5, i)) then
language = ArrRS(5, i)
response.write language & "<br>"
End If
Number = ArrRS(0, i)
CountryRep = ArrRS(5, i)
SQLStmt2 = "SELECT * FROM NewsContent WHERE NewsID = "& Number &" "_
& "ORDER BY NewsLanguageID ASC"
ArrRS2 = Connect.Execute(SQLStmt2).getrows()
Response.Write ArrRS(6, i) &" (published: "& ArrRS(2, i) &")<br>"
Response.Write"Existing languages: "
For a = 0 to ubound(ArrRS2,2)
Response.Write"<img src=""/bin/images/flags/"& ArrRS2(1, a) &".gif"">"_
& "<img src=""/bin/images/flags/1x1vit.gif"">"
Next
Response.Write"<br><a href=""view.asp?documentID=News&catID=wt&Action=AddStep1&NewsID="& ArrRS(0, i) &""_
& """>Add new language version</a><br><br>"
Next
------------------
1 Man, 1 Million dead, The odds are just about even - Ash