calendario

[alberto_gc]

hola tengo un calendario pero es javascrip en mi pagina asp quisiera saber como
puedo guardar el resultado de ese calendario en mi base de datos , ya lo eh intentado pero al momento de guardar mis datos este me almacena en blanco los demas datos que tengo en el formulario como le puedo hacer alguien sabe

[daniel00]

Sí nos muestras como guardas el resto de tus daatos sería más fácil ayudarte.

[alberto_gc]

Iniciado por daniel00

Sí nos muestras como guardas el resto de tus daatos sería más fácil ayudarte.

claro que si

Código PHP:

  <form action="requis.asp" method="POST" enctype="multipart/form-data" name="sampleform" class="Estilo2" id="form1" onsubmit="MM_validateForm('textfield2','','R','textfield','','R','label','','R','label5','','R','label8','','R','label9','','R','label6','','R','textarea','','R','label7','','R','label4','','R');return document.MM_returnValue"> 
 
 
<small><a href="javascript:showCal('Calendar1')" class="Estilo4"><strong>Fecha/Pedido:</strong></a></small></td> 
      <td><input type="text" name="firstinput"  size="20" maxlength="30"/>  
   

asi esta mi formulario y creo qeuel error eesta en la cabecera del formulairo ya que hay varios campos que no entiendo y que en internet me dijieron que lo tenia que poner asi para que funcionara el calendario y en si el calendario das clik en fecha/pedido y te muestra un calendario y este cuando seleccionas una fecha te la pone en el texfield pero sin embargo no la guarda y no la inserta en la tabla


noce si me xplico

[Adler]

Hola

A priori no hay ninguna razón por la que no se te debería de guardar ese valor. ¿Cuál es el formato de la fecha? ¿No te genera ningún error?

Suerte

[alberto_gc]

bueno en ese no me genera error simplemente no guarda nada

[Adler]

Hola

Lo haces así?

Código asp:

fecha = request.form("firstinput")
insert into tabla (campo) values ('#"&fecha&"#')
 

Eso debería de funcionar

Suerte

[alberto_gc]

<%
fecha = request.form("firstinput")

Dim oConn,strSQL,objRS

Set oConn = Server.CreateObject("ADODB.Connection")

oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=C:\mibase.mdb")

strSQL = "insert into almacen (folio, firstinput, departamento, cantidad, unidadm, descripcion, uso, existenciaal, precioc, preciof, observaciones, secondinput) values ('" & Request.Form("folio") & "','" & Request.Form('#"fecha"#') & "','" & Request.Form("departamento") & "','" & Request.Form("cantidad") & "','" & Request.Form("unidadm") & "','" & Request.Form("descripcion") & "','" & Request.Form("uso") & "','" & Request.Form("existenciaal") & "','" & Request.Form("precioc") & "','" & Request.Form("preciof") & "','" & Request.Form("observaciones") & "','" & Request.Form("secondinput") & "')"
oConn.Execute(strSQL)
oConn.Close
set oConn = nothing

Response.Redirect("pagina.asp")

%>

asi quedaria

[Adler]

Hola

No eso esta mal

O así

'#" & Request.Form(firstinput) & "#'

o la recoges en una variable

fecha = request.form("firstinput")

con lo que quedaría asií

'#"&fecha&"#'

Suere

[alberto_gc]

Iniciado por Adler

Hola

No eso esta mal

O así

'#" & Request.Form(firstinput) & "#'

o la recoges en una variable

fecha = request.form("firstinput")

con lo que quedaría asií

'#"&fecha&"#'

Suere

En mi base tengo estos datos. En mi formulario
folio texto folio
fecha texto firstinput
depto texto depto
cantidad texto cantidad
unidadm texto unidadm
descripcion texto descripcion
uso texto uso
existenciaal texto existenciaal
precioc texto precioc
preciof texto preciof
observaciones texto observaciones
fecha1 texto secondinput

Bueno y esta es mi conexion:

<%

fecha = Request.Form("firstinput")


if fecha = "" then fecha = "-"


Dim oConn,strSQL, objRS

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=C:\mibase.mdb")


strSQL = "insert into mitabla (folio, fecha, depto, cantidad, unidadm, descripcion, uso, existenciaal, precioc, preciof, observaciones, secondinput) values ('" & Request.Form("folio") & "','#" & Request.Form(firstinput) & "#','" & Request.Form("depto") & "','" & Request.Form("cantidad") & "','" & Request.Form("unidadm") & "','" & Request.Form("descripcion") & "','" & Request.Form("uso") & "','" & Request.Form("existenciaal") & "','" & Request.Form("precioc") & "','" & Request.Form("preciof") & "','" & Request.Form("observaciones") & "','" & Request.Form("secondinput") & "')"


oConn.Execute(strSQL)
oConn.Close
set oConn = nothing

Response.Redirect("requ.asp")
%>

[Adler]

Hola

Como el campo fecha es de texto quitale las almohadillas.

Haz lo así

Código asp:

if Request.Form("firstinput") = "" then fecha = "-" else fecha = = Request.Form("firstinput") end if
 
 
    Dim oConn,strSQL, objRS 
    
    Set oConn = Server.CreateObject("ADODB.Connection") 
    oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=C:\mibase.mdb") 
        
    
strSQL = "insert into mitabla (folio, fecha, depto, cantidad, unidadm, descripcion, uso, existenciaal, precioc, preciof, observaciones, secondinput) values ('" & Request.Form("folio") & "','" & fecha & "','" & Request.Form("depto") & "','" & Request.Form("cantidad") & "','" & Request.Form("unidadm") & "','" & Request.Form("descripcion") & "','" & Request.Form("uso") & "','" & Request.Form("existenciaal") & "','" & Request.Form("precioc") & "','" & Request.Form("preciof") & "','" & Request.Form("observaciones") & "','" & Request.Form("secondinput") & "')"
 

Suerte