Lidt mere info, her er hele min kode.
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!--#include file="Connections/PlotterCon.asp" -->
<%
Dim strSQL
' Henter værdien fra kigplotter.asp
strKundeNr = Request.Form("KundeNr")
strDokuNo = Request.Form("DokuNo")'
strDatoFra = Request.Form("DatoFra")
strKundeNr = Request.Form("DatoTil")
strSQL = "SELECT Document No_, Line No_, Sell-to Customer No_, Text, Font, TypeAndColor, Layout, Height, Quantity, ProducedDateTime FROM N_S_SYSTEM$PlotterJOb WHERE"
strSQL = strSQL & "( ProducedDateTime BETWEEN '" & strDatoFra & "' AND '" & strDatoTil & "' )"
strSQL = strSQL & " OR( Sell-to Customer No_ LIKE '" & strKundeNr & "' )"
strSQL = strSQL & " OR( Document No_ LIKE '" & strDokuNo & "' )"
strSQL = strSQL & " AND( Produced = ‘1’ )"
%>
<%
Dim Recordset1
Dim Recordset1_cmd
Dim Recordset1_numRows
Set Recordset1_cmd = Server.CreateObject ("ADODB.Command")
Recordset1_cmd.ActiveConnection = MM_PlotterCon_STRING
Recordset1_cmd.CommandText = strSQL
Recordset1_cmd.Prepared = true
Set Recordset1 = Recordset1_cmd.Execute
Recordset1_numRows = 0
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "
http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="
http://www.w3.org/1999/xhtml"><head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Untitled Document</title>
</head>
<body>
<table width="600" border="0">
<tr>
<td><%=(Recordset1.Fields.Item("Sell-to Customer No_").Value)%></td>
<td><%=(Recordset1.Fields.Item("Document No_").Value)%></td>
<td> </td>
<td> </td>
<td> </td>
</tr>
</table>
<% If Recordset1.EOF And Recordset1.BOF Then %>
<p>Der var ingen resultat af din søgning</p>
<% End If ' end Recordset1.EOF And Recordset1.BOF %>
</body>
</html>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>
