SQL sætninger hvor der Where XYZ er lig "Session.Servervariable"
nederst ses SQL sætningen... hvis sætningen nedenfor giver true... skal der kun vises/hentes records hvor dk_comment = trueellers skal der kun vises/hentes records hvor dk_comment er false
<% if Session("Language") = "dk" %>
True
<% else %>
False
<% end if %>
<%
Dim Recordset3__MMColParam
Recordset3__MMColParam = "1"
if (Request.QueryString("PicID") <> "") then Recordset3__MMColParam = Request.QueryString("PicID")
%>
<%
set Recordset3 = Server.CreateObject("ADODB.Recordset")
Recordset3.ActiveConnection = MM_PhotoDB_STRING
Recordset3.Source = "SELECT * FROM Picture_Comments WHERE PicID = " + Replace(Recordset3__MMColParam, "'", "''") + " ORDER BY CommentID ASC"
Recordset3.CursorType = 0
Recordset3.CursorLocation = 2
Recordset3.LockType = 3
Recordset3.Open()
Recordset3_numRows = 0
%>
