Cómo modificar el programa asp después de convertir la base de datos
lt;BODYgt;
lt;scriptgt;
función CheckAll(formulario) {
para ( var i=0; ilt; form.elements.length; i ) {
var e = form.elements[i]; ) e.checked = form.chkall.checked
}
}
lt;/scriptgt;
lt; p>
lt; p>
si fla2="0" y request.Cookies(" shiwei_id")lt;gt; "1" entonces
gt;
lt;brgt;lt; centergt;lt;img src="./images/note.gif" align="absmiddle"gt;? lt;font color="#FF0000"gt;No tiene este permiso, por favor contacta al administrador! lt;/fontgt;lt;/centergt;
lt;
respuesta.end
end if
if request("isok ")lt;gt;" entonces
conn.execute(" actualizar comprar set isok="amp; request("isok")amp;"" donde bianhao='"amp; request("bianhao" )amp; "'")
end if
'Obtener el número de página actual
currentpage=request("page")
' respuesta.escribir página actual
'response.end
si página actuallt;1 o página actual="" entonces
página actual="1"
fin if
'Obtener palabras clave de búsqueda
nowstartdate=request("startdate")
if nowstartdate="" entonces
nowstartdate=fecha ( )-día(fecha()-1)
'respuesta.escribir página actual
'end
if página actuallt1)
fin si
nowenddate=request("enddate")
si nowenddate="" entonces
nowenddate=date( )
finalizar si
nowku=request("ku")
nowkeyword=request("keyword")
gt
lt; = "100" border="0" cellpadding="0" cellpacing="2" align="center"gt;
lt formulario nombre="
form2"gt;
lt;trgt;
lt;td width="5" height="21" gt;?
lt;td width= "5" height="21" gt;?/images/print.jpg" align="absmiddle" style="cursor:hand;" onClick="preview();window.close()"gt;lt;/tdgt ;
lt;td width="95" align="right"gt;
Fecha de inicio:
lt;input name="fecha de inicio" value= "lt;=nowstartdategt;" readonly style="width: 100px"gt;
lt;img src="./images/date.gif" align="absmiddle" style="cursor: puntero; " onClick="JavaScript: window.open('day.asp?form=form2amp;field=startdateamp;oldDateamp;date='day.asp?amp;oldDate='startdate.value,'','directorys=no,toolbar =no, estado=no, barra de menú=no, barras de desplazamiento=no, resizable=no, ancho=250, alto=170, arriba=150, izquierda=590');"gt;
Fecha de finalización:
lt; nombre de entrada="fecha de finalización" valor="lt; =nowenddategt;" estilo de solo lectura="ancho: 100px"gt; /date.gif" align="absmiddle" style="cursor: pointer;" onClick="JavaScript: window.open('day.asp?form=form2amp;field=enddateamp;oldDate=' enddate.value,'', 'directorios=no, barra de herramientas=no, estado=no, barra de menú=no, barras de desplazamiento=no, redimensionable=no, ancho=250, alto=170, arriba=150, izquierda=740');
lt;
Si request.Cookies("shiwei_id")="1" o fla88="1" entonces
sql="select * from ku order by id"
set rs_ku=conn.execute(sql)
else
sql="select * from ku donde instr(login,',"& request. Cookies ("shiwei_id")&",')gt;0 ordenar por id"
set rs_ku=conn.execute(sql)
i
f rs_ku.eof entonces
nowku="0"
elseif request("ku")="" entonces
nowku=rs_ ku("id" )
finalizar si
finalizar si
gt
lt; seleccionar nombre="ku" onChange="form2.submit( )"gt;
lt; if request.Cookies(" shiwei_id")="1" o fla88="1" thengt;
lt; option value=""gt; Todos los almaceneslt;/optiongt;
lt;elseif rs_ku.eof thengt;
lt; option value="0"gt;No hay almacenes que administreslt;/optiongt; p>
p>
lt; fin ifgt;
lt;
hacer mientras rs_ku.eof=false
gt; >
lt ;option value="lt;=rs_ku("id")gt;"lt;if trim(cstr(rs_ku("id")))=nowku thenngt;selected="selected"lt;end ifgt ;gt;lt; =rs_ku ("ku")gt;lt;/optiongt;
lt;
rs_ku.movenext
bucle
gt;
lt;/selectgt;
lt;tipo de entrada="texto" nombre="palabra clave" tamaño="20" valor="lt;=nowkeywordgt; "gt;
lt; p>
lt; tipo de entrada="oculto" nombre="hid" valor="ok"gt;
lt; tipo de entrada=" enviar" valor=" consulta " class="botón" gt;?
lt;/tdgt;
lt;/trgt;
lt;/formgt
lt;/tablegt ;
lt;table width="100" border="0" cellpadding="0" cellpacing="0" bgcolor="#C4D8ED"gt ;
lt;trgt;
lt;tdgt;lt;img src="./images/r_1.gif" alt=""/gt;lt;/tdgt;
lt;td width=" 100" background="./images/r_0.gif"gt;
lt; tabla cellpadding="0" cellpacing="0" width=" 100"gt;
lt ;trgt;
lt;tdgt;?Consulta de registro entrantelt;/tdgt;
lt;td align="right"gt ;? lt;/tdgt;
lt;/trgt;
lt;/tabla
gt;
lt;/tdgt;
lt;tdgt;lt;img src="./images/r_2.gif" alt=""/gt;lt;/tdgt ;
lt;/trgt;
lt;trgt;
lt;tdgt;lt;/tdgt;
lt;tdgt ;
lt;! --startprint--gt;
lt; table align="center" cellpadding="4" cellpacing="1" class="toptable grid" border="1"gt;
lt; nombre del formulario="form1" action="buy_del.asp"gt;
lt; tipo de entrada="hidden" nombre="fecha de inicio" valor="lt;=nowstartdategt;"gt;
lt; tipo de entrada="hidden" nombre="fecha de finalización" valor="lt;=nowenddategt;"gt; type="hidden" name="ku" value="lt;=nowkugt;"gt )
lt;input type="hidden" name="palabra clave" value="lt;=nowkeywordgt;" gt;
lt;tipo de entrada="hidden" nombre="pedido1" valor="lt.=request("order1")gt;"gt;
lt;tipo de entrada ="oculto" nombre="pedido2" valor="lt;=request("pedido2")gt;"gt;
lt;tipo de entrada="oculto" nombre="pedido3" valor="lt ;=solicitud("pedido3")gt;"gt;
lt;tipo de entrada="hidden" nombre="pedido4" valor="lt;=solicitud(" pedido4")gt;"gt;
lt; tipo de entrada="hidden" nombre="pedido5" valor="lt;=request("pedido5")gt;"gt;
lt;tipo de entrada=" oculto" nombre="order6" valor="gt;"gt;
lt; tipo de entrada="oculto" "gt
tipo de entrada="oculto" nombre= "order8" value="lt;=request("order8")gt;"gt;
lt;input type="hidden" name="order9" value="lt;=request("order9 ")gt;"gt;
lt; tipo de entrada="hidden" nombre="order10" value="lt;=request("order10")gt;"gt;
lt; tipo de entrada="oculto"
name="order11" value="lt;=request("order11")gt;"gt;
lt;input type="hidden" name="order12" value="lt;=request( "order11")gt;"gt;
lt; tipo de entrada="hidden" nombre="order12" value=" lt;=request("order12")gt;"gt;
lt; tipo de entrada="oculto" nombre="orden13" valor="lt;=request("order13")gt;"gt;"
lt; tipo de entrada="nombre oculto" ="pedido14" valor="lt;=solicitud("pedido14")gt;"gt;"
lt;input type="hidden" nombre="pedido15" valor="lt;=solicitud( "orden15")gt; "gt;"
lt; tr align="centro"gt;
lt; ;img src="./images/folder_close.gif" style="cursor:hand" onClick="collapseall(this)" /gt;lt;lt;img="./gt;lt;/tdgt;
lt; td class="categoría" altura="30"gt )
lt; a href="?order1=lt; if request("order1")="asc" thengt; desclt;elsegt;asclt;end ifgt;amp;page=lt;=currentpage gt;amp;startdate=lt;=nowstartdategt;amp;enddate=lt;=nowenddategt;amp;ku=lt;=nowkugt;amp;keyword= lt;=nowkeywordgt;" class="ifgt;elsegt;asclt;end gt;" class="title"gt;numberlt;if request("order1")="asc" thengt;lt;img src="./images /up2.gif" border="0" hspace="2" align="absmiddle"gt;lt;elsegt;lt;img src="./images/down2.gif" border="0" hspace="2" align="absmiddle"gt;lt;end ifgt;lt;/agt;
lt;/tdgt;
lt;td class="categoría"gt;
lt;a href="?order4=lt;if request("order4")="asc" thengt;desclt;elsegt;asclt;end ifgt;amp;page=lt;= currentpagegt;amp;startdate=lt ;=ahora
startdategt;amp;enddate=lt;=nowenddategt;amp;ku=lt;=nowkugt;amp;keyword=lt;=nowkeywordgt;" class="title"gt;tiempo de entradalt;if request("order4")= "asc " thengt;lt;img src=".../images/up2.gif" border="0" hspace="2" align="absmiddle"gt;lt;elsegt;lt;img src=".. ./ imágenes/down2.gif" border="0" hspace="2" align="absmiddle"gt;lt;end ifgt;lt;/agt;
lt;/tdgt;
lt;td class="category"gt;
lt;a href="?order5=lt;if request("order5")="asc" thengt;desclt;elsegt;asclt " clase ="title"gt;operatorlt;if request("order5")="asc" thengt;lt;img src=".../images/up2.gif" border="0" hspace="2" align= " absmiddle"gt;lt;elsegt;lt;img src="./images/down2.gif" border="0" hspace="2" align="absmiddle"gt;lt;end ifgt;lt;/agt;
lt;/tdgt;
lt;td class="categoría"gt;
lt;a href="?order6=lt;if request( " order6")="asc" thengt;desclt;elsegt;asclt;end ifgt;amp;page=lt;= currentpagegt;amp;startdate=lt;=nowstartdategt;amp;enddate=lt;=nowenddategt;amp;ku= lt ;=nowkugt;amp;keyword=lt;=nowkeywordgt;" class="title"gt;Proveedorlt;if request("order6")="asc" thengt;lt;img src=".../images /up2. gif" border="0" hspace="2" align="absmiddle"gt;lt;elsegt;lt;img src="./images/down2.gif" border="0" hspace="2" align=" absmiddle"gt;lt;end ifgt;lt;/agt;lt;/tdgt;
lt;td class="cat
egory"gt;
lt;a href="?order7=lt;if request("order7")="asc" thengt;desclt;elsegt;asclt;end ifgt;amp;page=lt; =currentpagegt;amp;startdate=lt;=nowstartdategt;amp;enddate=lt;=nowenddategt;amp;ku=lt;=nowkugt;amp;keyword=lt;=nowkeywordgt;" class="title"gt;cantidadlt; if request("order7")="asc" thengt;lt;img src=".../images/up2.gif" border="0" hspace="2" align="absmiddle"gt;lt;elsegt; ;img src="./images/down2.gif" border="0" hspace="2" align="absmiddle"gt;lt;end ifgt;lt;/agt;
lt; tdgt;
lt; si request.Cookies("shiwei_id")="1" o fla87="1" entonces gt
lt;
lt;a href="?order9=lt;if request("order9")=" asc" thengt;desclt;elsegt;asclt;end ifgt;amp;page=lt;=currentpagegt; amp ; fecha de inicio=lt; "order9" )="asc" thengt;lt;img src="./images/up2.gif" border="0" hspace="2" align="absmiddle"gt;lt;elsegt; lt;img src= "./images/down2.gif" border="0" hspace="2" align="absmiddle"gt;lt;end ifgt;lt;/agt;
lt; /tdgt;
p>lt; fin ifgt;
lt; td class="categoría"gt
href="?order10= lt; si solicitud("orden10 ")="asc" thengt; fecha de inicio=lt; fecha de inicio=lt; ; amp;palabra clave=lt;=nowkeywordgt;" class="title"gt; donelt; if request("pedido
10")="asc" thengt;lt;img src=".../images/up2.gif" border="0" hspace="2" align="absmiddle"gt;lt;elsegt;lt;img src =".../images/down2.gif" border="0" hspace="2" align="absmiddle"gt;lt;end ifgt;lt;/agt;
lt;/tdgt ;
lt; si fla1="1" o request.Cookies("shiwei_id")="1" entonces>
lt; /tdgt;
lt;end ifgt;
lt;if fla4="1" o request.Cookies("shiwei_id")="1" thengt;
lt;td class="categoría"gt; eliminarlt;/tdgt;
lt;end ifgt;
lt;/trgt;
lt;
set rs_buy =server.createobject("ADODB.RecordSet")
sql="select * from buy donde type=0 and zu"
if request .Cookies("shiwei_id")lt;gt;1 y lookbuysell="yes" y fla89="0" luego
sql=sqlamp;" y id_login="amp;request.
end if
if nowstartdatelt;gt;"" then
sql=sqlamp;" and selldate-#"amp;nowstartdateamp;""#gt;=0" p>
end if
if nowenddatelt;gt;"" then
sql=sqlamp;" y selldate-#"amp;nowenddateamp "#lt;=0"
p>
end if
if nowkult;gt;"" then
sql=sqlamp;" y bianhao in (seleccione bianhao de comprar donde tipo=0 y id_ku=" amp;nowkuamp;" y zu=false)"
finaliza si
if nowkeywordlt;gt;"" entonces
sql=sqlamp;" y (bianhao = '"amp;nowkeywordamp;"' o id_gys en (seleccione la identificación de gys donde la empresa es como '"amp.nowkeywordamp;"') o id_login en (seleccione la identificación de inicio de sesión donde el nombre de usuario es como '"amp;nowkeywordamp;" ') o bi
anhao in (seleccione bianhao de comprar donde tipo=0 y (título como '"amp;nowkeywordamp;"' o huohao como '"amp;nowkeywordamp;"')))
end if
if request("order1")lt; gt;"" then
sql=sqlamp;" orden por bianhao "amp; ("order2")lt;gt;"" entonces
sql=sqlamp;" ordenar por huohao" amp;request("order2")
elseif request("order3") lt;gt;"" then
sql=sqlamp;"Ordenar por título" amp;request("order3")
elseif request("order4")lt;gt;" " entonces
sql=sqlamp; "Ordenar por fecha" & request("order4")
elseif request ("order5")lt;
elseif request ("order6")lt;gt;"" entonces
sql=sqlamp;" ordenar por id_login "amp; request("order5")
elseif request("order6" ) lt;gt;"" entonces
sql=sqlamp;" ordenar por id_gys "& request("order6")
elseif request("order7")lt;gt "" entonces
sql=sqlamp; " orden por shulian " amp; request("order7")
elseif request("order8")lt;gt;"" entonces p>
sql=sqlamp;"pedir por precio2 "& request("order8")
elseif request("order9")lt;gt;"" entonces
sql=sqlamp ;" ordenar por precio2 "amp; request("order9")
elseif request("order10")lt;"" then
sql=sqlamp;" ordenar por isok "amp; request("order10")
else
sql=sqlamp;" ordenar por fecha de venta desc"
finalizar si
rs_buy.open sql, conn, 1, 3 (esta es una línea de código incorrecta)
'set rs_buy=conn.execute(sql) (otro método tiene el mismo error)
p>si no es rs_buy.eof entonces
<p> rs_buy.pagesize=maxrecord
rs_buy.absolutepage=currentpage
para currentrec=1 a rs_buy.pagesize
si rs_buy.eof entonces
salir para
finalizar si
gt;
tr onMouseOver="this.className='highlight'" onMouseOut="this.className =''" onDblClick=" javascript: var win=window.open('print_buy.asp?bianhao=lt;=rs_buy("bianhao")gt;','detalles','ancho=853,alto=470,arriba =176, izquierda=161,', barra de herramientas=no, ubicación=no barra de herramientas=no, ubicación=no, directorios=no, estado=no, barra de menú=no, redimensionable=no, barras de desplazamiento=yes'); )"gt;
lt;td align="center"gt;lt;img src="./images/folder_close.gif" style="cursor:hand" onClick="collapse(this, ' buylt;=currentrecgt;')" /gt;lt;lt;img="./gt;lt;/tdgt;
lt;td align="center" height="25"gt;lt ;=rs_buy("bianhao")gt;lt;/tdgt;
lt;td align="center"gt;lt;=rs_buy("selldate")gt;
lt;td align="center"gt;
lt;
sql="select * desde el inicio de sesión donde id="amp;rs_buy("id_login")
set rs_login=conn.execute(sql)
gt;
lt; si rs_login.eof lt; lt;=rs_login("nombre de usuario")gt; (lt;=rs_login("bianhao")gt;)lt; fin ifgt;
lt;