er der nogen som kan hjælpe. jeg prøver at lave min første inner join - som ikke virker.
<% Dim rsResults Dim rsResults_numRows
Set rsResults = Server.CreateObject("ADODB.Recordset") rsResults.ActiveConnection = MM_claims_conn_STRING tsk_sql = "SELECT * FROM dbo.tblDamage WHERE (DateOfDamage between '" & ConvertToSqlDate(Request.Querystring("startdate")) & "' AND '" & ConvertToSqlDate(Request.Querystring("enddate")) & "') "
If Request.QueryString("ship")<>"" Then tsk_sql = tsk_sql & "AND shipsID = " & Request.QueryString("ship") & " " End if If Request.QueryString("flag")<>"" Then tsk_sql = tsk_sql & "INNER JOIN dbo.tblShips ON dbo.tblDamage.shipsID = dbo.tblShips.IDship AND flagID = " & Request.QueryString("flag") & " " End if If Request.QueryString("search")<>"" Then tsk_sql = tsk_sql & "AND Description LIKE '%" & Request.QueryString("search") & "%' " End if If Request.QueryString("type")<>"" Then tsk_sql = tsk_sql & "AND Type = '" & Request.QueryString("type") & "' " End if If Request.QueryString("reported")<>"" Then tsk_sql = tsk_sql & "AND SurveyedByInsurance = 'Y' " End if If Request.QueryString("caseopen")<>"" Then tsk_sql = tsk_sql & "AND CaseClosed = 'Y' " End if
Mød en af Nordens fremmeste eksperter i adfærdsdesign – Morten Münster, der bl.a. har skrevet ” Jytte fra marketing er desværre gået for i dag” – på Computerworld Cloud & AI Festival.
Set rsResults = Server.CreateObject("ADODB.Recordset") rsResults.ActiveConnection = MM_claims_conn_STRING tsk_sql = "SELECT * FROM dbo.tblDamage "
If Request.QueryString("flag")<>"" Then tsk_sql = tsk_sql & "INNER JOIN dbo.tblShips ON dbo.tblDamage.shipsID = dbo.tblShips.IDship AND flagID = " & Request.QueryString("flag") & " " End if
tsk_sql = tsk_sql & "WHERE (DateOfDamage between '" & ConvertToSqlDate(Request.Querystring("startdate")) & "' AND '" & ConvertToSqlDate(Request.Querystring("enddate")) & "') "
If Request.QueryString("ship")<>"" Then tsk_sql = tsk_sql & "AND shipsID = " & Request.QueryString("ship") & " " End if
If Request.QueryString("search")<>"" Then tsk_sql = tsk_sql & "AND Description LIKE '%" & Request.QueryString("search") & "%' " End if If Request.QueryString("type")<>"" Then tsk_sql = tsk_sql & "AND Type = '" & Request.QueryString("type") & "' " End if If Request.QueryString("reported")<>"" Then tsk_sql = tsk_sql & "AND SurveyedByInsurance = 'Y' " End if If Request.QueryString("caseopen")<>"" Then tsk_sql = tsk_sql & "AND CaseClosed = 'Y' " End if
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.