Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Thiago Gurgel

[Resolvido] s em request...

Por , em ASP Clássico

Recommended Posts

Thiago Gurgel    0

Thiago Gurgel
Postado

oLA, galera to com uma duvida que gostaria que voces me ajudacem,

 

tenho uma arquivo chamado index.asp para fazer um controle de vias amarelas,

 

CODE
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

<%response.buffer="true"%>

<% Response.Expires = 0 %>

<!-- #include file="../adovbs.inc" -->

<!-- #include file="../conexao.asp" -->

<%

cod = Request.Form("venda")

sAcao = Request.Form("Acao")

hora=request("hora")

Data=request("data")

venda = Request("venda")

vendedores = Request("vendedores")

pagamento = Request("pagamento")

If ( data = "" and hora = "") then

data = date()

Hora = hour(time) & ":" & minute(time)

End If

%>

<html>

<head>

<title>Documento sem título</title>

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

</head>

<script type='text/javascript'>

function iframeAutoHeight(quem){

//by Micox - elmicox.blogspot.com - elmicox.com - webly.com.br

if(navigator.appName.indexOf("Internet Explorer")>-1){ //ie sucks

var func_temp = function(){

var val_temp = quem.contentWindow.document.body.scrollHeight + 5

quem.style.height = val_temp + "px";

}

setTimeout(function() { func_temp() },100) //ie sucks

}else{

var val = quem.contentWindow.document.body.parentNode.offsetHeight + 5

quem.style.height= val + "px";

}

}

function DataHora(evento, objeto){

var keypress=(window.event)?event.keyCode:evento.which;

campo = eval (objeto);

if (campo.value == '00/00/0000')

{

campo.value=""

}

 

caracteres = '0123456789';

separacao1 = '/';

conjunto1 = 2;

conjunto2 = 5;

conjunto3 = 10;

conjunto4 = 13;

conjunto5 = 16;

if ((caracteres.search(String.fromCharCode (keypress))!=-1) && campo.value.length < (19))

{

if (campo.value.length == conjunto1 )

campo.value = campo.value + separacao1;

else if (campo.value.length == conjunto2)

campo.value = campo.value + separacao1;

}

else

event.returnValue = false;

}

</script>

 

<body>

<img src="grupo.jpg" width="200" height="51">

<form action="adm_vias.asp" method="post" name="form" target="lista" id="form">

<p align="center"><strong><font color="#FF3300" size="6" face="BigNoodleTitling">Controle de vias amarelas</font></strong></p>

<table width="100%" border="0">

<tr>

<td width="15%"><div align="right"><strong><font size="2" face="verdana">Data</font></strong></div></td>

<td width="85%"><strong><font size="2" face="verdana">

<input name="data" type="text" id="data" value="<%=data%>" size="19" maxlength="19">

</font></strong></td>

</tr>

<tr>

<td><div align="right"><strong><font size="2" face="verdana">Nº da

venda</font></strong></div></td>

<td><strong><font size="2" face="verdana">

<input name="venda" type="text" id="venda" size="10" maxlength="10">

</font></strong></td>

</tr>

<tr>

<td><div align="right"><strong><font size="2" face="verdana">Vendedor</font></strong></div></td>

<td><strong><font size="2" face="verdana"> </font></strong>

<p>

<label> <em><strong><font size="2" face="verdana">

<input type="radio" name="Vendedores" value="Internet">

Internet</font></strong></em></label>

<em><strong><font size="2" face="verdana"><br>

<label>

<input type="radio" name="Vendedores" value="Rodrigo">

Rodrigo</label>

<br>

<label>

<input type="radio" name="Vendedores" value="Lourdes">

lourdes</label>

<br>

<label>

<input type="radio" name="Vendedores" value="Marcelo">

Marcelo</label>

<br>

<label>

 

<input type="radio" name="Vendedores" value="Joao Paulo">

Joao Paulo</label>

<br>

<label>

<input type="radio" name="Vendedores" value="william">

William</label>

<br>

<label>

<input type="radio" name="Vendedores" value="Marisa">

Marisa</label>

<br>

<label>

<input type="radio" name="Vendedores" value="Jucimara">

Jucimara</label>

<br>

<label>

<input type="radio" name="Vendedores" value="Thiago">

Thiago </label>

<br>

<label>

<input type="radio" name="Vendedores" value="Gurgel">

Gurgel</label>

<br>

<label>

<input type="radio" name="Vendedores" value="Assistencia">

Assistencia</label>

<br>

<label>

<input type="radio" name="Vendedores" value="Vendedor Externo">

Vendedor Externo</label>

</font></strong></em><br>

</p></td>

</tr>

<tr>

<td><div align="right"><strong><font size="2" face="verdana">Pagamento</font></strong></div></td>

<td><strong><font size="2" face="verdana">

<input name="pagamento" type="text" id="pagamento">

</font></strong></td>

</tr>

<tr>

<td height="27">

<div align="right"><strong><font size="2" face="verdana">Hora</font></strong></div></td>

<td><strong><font size="2" face="verdana">

<input name="hora" type="text" id="hora" value="<%=hora%>">

         <input type="submit" name="Submit" value="Cadastrar">

</font></strong></td>

</tr>

</table>

</form>

 

 

 

 

<%

Set rscontrole = Server.CreateObject("ADODB.RecordSet")

%>

<iframe id='vias' src='lista_vias.asp' onload='iframeAutoHeight(this)' name="lista" frameborder='0' width="100%" scrolling="no" allowtransparency="true" ></iframe>

</body>

</html>

 

<% Set rscontrole = Nothing

fecha_conexao

%>

 

 

E outro que ADD isto td no banco de dados, que vem logo apos e é chamado pelo index,

 

CODE
<!-- #include file="../conexao.asp" -->

<%

'========================================================================

'====== CGI DE CADASTRO, ALTERAÇÃO E EXCLUSÃO DOS funcionarios =======

'========================================================================

 

data = Request("data")

venda = Request("venda")

vendedores = Request("vendedores")

pagamento = Request("pagamento")

hora = Request("hora")

 

SQL = "INSERT INTO controle (data, venda, vendedor, pagamento, hora)"

SQL = SQL & " VALUES ('" & data & "','" & venda & "','" & vendedores & "', '" & pagamento & "', '" & hora & "')"

 

Conexao.Execute SQL

 

Fecha_Conexao

Response.Redirect "lista_vias.asp"

%>

 

 

Apos isto vem o lista que lista todos os dados que foram incluidos,

 

CODE
<!-- #include file="../conexao.asp" -->

<%

'========================================================================

'====== CGI DE CADASTRO, ALTERAÇÃO E EXCLUSÃO DOS funcionarios =======

'========================================================================

 

data = Request("data")

venda = Request("venda")

vendedores = Request("vendedores")

pagamento = Request("pagamento")

hora = Request("hora")

 

SQL = "INSERT INTO controle (data, venda, vendedor, pagamento, hora)"

SQL = SQL & " VALUES ('" & data & "','" & venda & "','" & vendedores & "', '" & pagamento & "', '" & hora & "')"

 

Conexao.Execute SQL

 

Fecha_Conexao

Response.Redirect "lista_vias.asp"

%>

 

 

ta funcionando tudo direitinho, mas com um probleminha, este controle precisa sair um relatorio do dia e hora que comecou sair a remeça, entao quando fasso tudo isso ele não consegue me trazer a data que esta sendo registrada,

 

 

POR FAVOR ME AJUDEM...

 

VLW

Compartilhar este post

Link para o post
Compartilhar em outros sites

Thiago Gurgel    0

Thiago Gurgel
Postado

Salva a data atual no banco de dados date(), assim sempre terá a data da remessa

mas ela é salva, mas eu tenho que tirar as vias em uma remessa, EX: as 15:00

 

saiu 25 vias, dai o horario não pode mudar entende ?

 

o index pega o formulario e leva para o add_vias, até ai ele esta com a hora no request, mas quando o add no final do codigo da um Response.Redirect "lista_vias.asp" este lista perde todo o request,

 

 

queria que ele mandace o request que recebeu para frente tem como ??

 

 

vlw

Compartilhar este post

Link para o post
Compartilhar em outros sites

Thiago Gurgel    0

Thiago Gurgel
Postado

Salva a data atual no banco de dados date(), assim sempre terá a data da remessa

mas ela é salva, mas eu tenho que tirar as vias em uma remessa, EX: as 15:00

 

saiu 25 vias, dai o horario não pode mudar entende ?

 

o index pega o formulario e leva para o add_vias, até ai ele esta com a hora no request, mas quando o add no final do codigo da um Response.Redirect "lista_vias.asp" este lista perde todo o request,

 

 

queria que ele mandace o request que recebeu para frente tem como ??

 

 

vlw

 

gente consegui ,

 

 

Fiz assim

 

 

Coloquei response.cookie("hora") = hora

 

E no lista coloquei assim

 

request.cookie("hora")

 

 

Deu certo

 

Vlw

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito