CREATE  procedure dbo.findcustomers

@Company    nvarchar( 100 ),
@NameID     nvarchar( 20 ),
@Address    nvarchar( 100 ),
@City       nvarchar( 50 )
as
select   CustomerID,
	 NameID,
	 Company,
          Address,
          City,

from customers c

where  c.Company like '%'+@Company+'%'
and     c.NameID 	like '%'+@NameID+'%'
and     c.Address 	like '%'+@Address+'%'
and     c.City	like '%'+@City+'%'

<%dim connect, rs, cmd
dim sid
sid= " " 
dim sCompany, sNameID, sAddress, sCity
sCompany=Request( "Company" )( 1 )
sNameID=Request( "NameID" )( 1 )
sAddress=Request( "Address" )( 1 )
sCity=Request( "City" )( 1 )
set connect=Server.CreateObject( "ADODB.Connection" )
connect.ConnectionTimeout= 15 
connect.CommandTimeout= 10 
connect.Open  "Provider=SQLOLEDB;Integrated Security=SSPI;Persist Security Info=True;Initial Catalog=Test;Data Source=SQL\TEST;Use Procedure for Prepare=1 ;Auto Translate=True;Packet Size= 4096 ;Use Encryption for Data=False;Tag with column collation when possible=False"


set cmd=Server.CreateObject( "ADODB.Command" )
cmd.CommandType=adCmdStoredProc
cmd.CommandText= "findcustomers" 
cmd.ActiveConnection=connect

cmd.Parameters.Append cmd.CreateParameter( "Company" ,adVarWChar,adParamInput, 100 ,sCompany)
cmd.Parameters.Append cmd.CreateParameter( "NameID" ,adVarWChar,adParamInput, 100 ,sNameID)
cmd.Parameters.Append cmd.CreateParameter( "Address" ,adVarWChar,adParamInput, 100 ,sAddress)
cmd.Parameters.Append cmd.CreateParameter( "City" ,adVarWChar,adParamInput, 50 ,sCity)

set rs=cmd.Execute

%>


<! -- îñíîâíàÿ òàáëèöà -->
 

<table border= "0 " cellpadding= "4 " cellspacing= "2 " width= "600 ">


<tr>
<td bgcolor= "#e0e0e0"  class= "zagolovok" > 205 ; 238 ; 236 ; 229 ; 240 ;</td>
<td bgcolor= "#e0e0e0"  class= "zagolovok" > 199 ; 224 ; 234 ; 224 ; 231 ; 247 ; 232 ; 234 ;</td>
<td bgcolor= "#e0e0e0"  class= "zagolovok" > 202 ; 238 ; 236 ; 239 ; 224 ; 237 ; 232 ; 255 ;</td>
<td bgcolor= "#e0e0e0"  class= "zagolovok" > 195 ; 238 ; 240 ; 238 ; 228 ;</td>
<td bgcolor= "#e0e0e0"  class= "zagolovok" > 210 ; 229 ; 235 ; 229 ; 244 ; 238 ; 237 ;</td>
<td bgcolor= "#e0e0e0"  class= "zagolovok"  align= "center"  colspan= "2 "></td>
</tr>


<%
while not rs.EOF
sid=rs.Fields( "NameID" ).value
%>


<tr>
<td bgcolor= "#e0e0e0"  class= "tables" ><%=rs.Fields( "CustomerID" ).value%></td>
<td bgcolor= "#e0e0e0"  class= "tables" ><a href= "infocustomers.asp?id=<%=sid%>" ><font size= "-2 "><%=rs.Fields( "NameID" ).value%></font></a></td>
<td bgcolor= "#e0e0e0"  class= "tables" ><%=rs.Fields( "Company" ).value%></td>
<td bgcolor= "#e0e0e0"  class= "tables" ><%=rs.Fields( "City" ).value%></td>
<td bgcolor= "#e0e0e0"  class= "tables" ><%=rs.Fields( "Phone1" ).value%></td>
<td bgcolor= "#e0e0e0"  align= "center" ><a href= "editcustomers.asp?id=<%=sid%>" ><font size= "-2 "> 200 ; 231 ; 236 ; 229 ; 237 ; 232 ; 242 ; 252 ;</font></a></td>
<td bgcolor= "#e0e0e0"  align= "center" ><a href= "deletecustomers.asp?id=<%=sid%>" ><font size= "-2 "> 211 ; 228 ; 224 ; 235 ; 232 ; 242 ; 252 ;</font></a></td>
</tr>


<% 
rs.MoveNext
wend
%>
</table>

<% rs.close
   connect.close %>