URGENT session problem

[lyealain]

hi...
assume that in pageA i have a dropdown box.., so when i click the value in the dropdown box.. and the value will come out in the textbox below..

<input type="textbox" name= "date1" value=<%rsGet.field("date")%> >

so if i want to update that date in the textbox.. the update query is in page B

if the value is correct then .. fine.. can update...

but if let say value is wrong..
page B
[PHP]session("date") = request.form ( " date1" )
if session(" date ") = " KAKAKA"
response.redirect(" pageA.asp?res=DateBlank")[/PHP]

HOW DO I MAINTAIN THE DATA FOR KAKAKA WHICH USER JUST KEY IN TO PAGE A...

it is because in pageA... that textbox data is called from database....

how to put the session(" date") in that textbox ???????????

PLS HELP ... THANKS THANKS

[lyealain]

pls help.......................

[danp129]

hi...
assume that in pageA i have a dropdown box.., so when i click the value in the dropdown box.. and the value will come out in the textbox below..

<input type="textbox" name= "date1" value=<%rsGet.field("date")%> >

so if i want to update that date in the textbox.. the update query is in page B

if the value is correct then .. fine.. can update...

but if let say value is wrong..
page B
[PHP]session("date") = request.form ( " date1" )
if session(" date ") = " KAKAKA"
response.redirect(" pageA.asp?res=DateBlank")[/PHP]

HOW DO I MAINTAIN THE DATA FOR KAKAKA WHICH USER JUST KEY IN TO PAGE A...

it is because in pageA... that textbox data is called from database....

how to put the session(" date") in that textbox ???????????

PLS HELP ... THANKS THANKS

<%
Dim dteUserDate
if session("date")<>"" then dteUserDate=session("date") else dteUserDate=rsGet.field("date")
%>
<input type="textbox" name= "date1" value=<%=dteUserDate%>>

Personally I tend to keep everything on one page and use session variables sparingly since the memory holding the session variables will be taken up until the session times out.

[lyealain]

which mean in page B i put

[PHP]if session(" date ") = " KAKAKA"
response.redirect(" pageA.asp?res=DateBlank")[/PHP]
in page A i put

[PHP]<%
Dim dteUserDate
if session("date")="KAKAKA" then dteUserDate=session("date") else dteUserDate=rsGet.field("date")
%>
<input type="textbox" name= "date1" value=<%=dteUserDate%>[/PHP]

but in page B i have a lot of
[PHP]if session(" date ") = " KAKAKA"
response.redirect(" pageA.asp?res=DateBlank")[/PHP]

[PHP]if session(" date2 ") = " KAKAKA"
response.redirect(" pageA.asp?res=DateBlank")[/PHP]

[PHP]if session(" date3 ") = " KAKAKA"
response.redirect(" pageA.asp?res=DateBlank")[/PHP]
..........
..........
............

so in page A..
<%
Dim dteUserDate
if session("date")="KAKAKA" then dteUserDate=session("date") else dteUserDate=rsGet.field("date")
%>

<%
Dim dteUserDate
if session("date2")="KAKAKA" then dteUserDate=session("date2") else dteUserDate=rsGet.field("date2")
%>

need to declare like that ????

[danp129]

which mean in page B i put

[PHP]if session(" date ") = " KAKAKA"
response.redirect(" pageA.asp?res=DateBlank")[/PHP]
in page A i put

[PHP]<%
Dim dteUserDate
if session("date")="KAKAKA" then dteUserDate=session("date") else dteUserDate=rsGet.field("date")
%>
<input type="textbox" name= "date1" value=<%=dteUserDate%>[/PHP]

but in page B i have a lot of
[PHP]if session(" date ") = " KAKAKA"
response.redirect(" pageA.asp?res=DateBlank")[/PHP]

[PHP]if session(" date2 ") = " KAKAKA"
response.redirect(" pageA.asp?res=DateBlank")[/PHP]

[PHP]if session(" date3 ") = " KAKAKA"
response.redirect(" pageA.asp?res=DateBlank")[/PHP]
..........
..........
............

so in page A..
<%
Dim dteUserDate
if session("date")="KAKAKA" then dteUserDate=session("date") else dteUserDate=rsGet.field("date")
%>

<%
Dim dteUserDate
if session("date2")="KAKAKA" then dteUserDate=session("date2") else dteUserDate=rsGet.field("date2")
%>

need to declare like that ????

I'd prolly do something like this on page A

Dim dteUserDate
Dim dteUserDate2
Dim dteUserDate3
if session("date")="KAKAKA" then dteUserDate=session("date") else dteUserDate=rsGet.field("date")
if session("date2")="KAKAKA" then dteUserDate2=session("date2") else dteUserDate=rsGet.field("date2")
if session("date3")="KAKAKA" then dteUserDate3=session("date3") else dteUserDate=rsGet.field("date3")
 
...
 
<input type="textbox" name="date1" value=<%=dteUserDate%>
<input type="textbox" name="date2" value=<%=dteUserDate2%>
<input type="textbox" name="date3" value=<%=dteUserDate3%>

[lyealain]

thanks... but for my page A /.. i have a form..
...
[PHP]<form action="???" enctype="multipart/form-data" method="post">
<input type="textbox" name="date1" value=<%=dteUserDate%>
<input type="textbox" name="date2" value=<%=dteUserDate2%>
<input type="textbox" name="date3" value=<%=dteUserDate3%>[/code][/quote]


<tr>
<td>&nbsp&nbsp</td>
<td width="100"><FONT FACE="Arial" SIZE="2" COLOR="#000000"><B>Upload Image</font></td>
<TD BGCOLOR="#EEEEEE">

<INPUT TYPE="file" NAME="myFile" name="file1" SIZE="40">&nbsp&nbsp
</td>
</tr>

</form>[/PHP]

what should i put for the action? page A or page B
because the verification in in page A

and i have the uploading funciton in page B...

if i put the action as pageA.. then is it
[PHP]
#
if session("date")="KAKAKA" then dteUserDate=session("date") else dteUserDate=rsGet.field("date")
#
if session("date2")="KAKAKA" then dteUserDate2=session("date2") else dteUserDate=rsGet.field("date2")
#
if session("date3")="KAKAKA" then dteUserDate3=session("date3") else dteUserDate=rsGet.field("date3")

else <form action="pageB"> </form>

[/PHP]

i used to verify something in another page... but don knwo how to do it in a single page... pls help...

[danp129]

Try somthing like this

<%
 
'Dim rsGet    'your recordset object
'Dim cn        'your connection object
'Dim strCon    'your connection string
'Dim strSQL 'your SQL query
'sCon="your connection string"
'set rsGet=CreateObject("adodb.recordset")
'set cn=CreateObject("adodb.connection")
'cn.open strCon
 
Dim dteUserDate1
Dim dteUserDate2
Dim dteUserDate3
Dim errMsg
 
if Request.Form("sub")="" then
    'The form was not submitted so prepare to show the form
    'ie set any default values you want to show in the form
 
    'strSQL="SELECT whatever from whatever"
    'rsGet.Open strSQL, cn, 1, 1
    dteUserDate1=rsGet("date1")
    dteUserDate2=rsGet("date2")
    dteUserDate3=rsGet("date3")
    call ShowForm
else
    'The form was submitted so validate data
    dteUserDate1=Request.Form("date1")
    dteUserDate2=Request.Form("date2")
    dteUserDate3=Request.Form("date3")
 
    if dteUserDate1 <> "what you want it to equal" then errMsg=errMsg & "<BR>Date1 is incorrect"
    if dteUserDate2 <> "what you want it to equal" then errMsg=errMsg & "<BR>Date2 is incorrect"
    if dteUserDate3 <> "what you want it to equal" then errMsg=errMsg & "<BR>Date3 is incorrect"
 
    if errMsg <> "" then
        'There was an error of some type so show the form
        call ShowForm
    else
        'no errors with user submitted data
 
        'put your code here to update the database
 
    end if
end if
 
call cleanup
'This is the end of the main code, the sub procedures below are called from above
 
 
Sub Cleanup
    on error resume next
    'close recordset if open and remove reference
    rsGet.Close
    set rsGet=nothing
    'close db connection  if open and remove reference
    cn.Close
    set cn=nothing
end sub
 
sub ShowForm
 
    if errMsg<>"" then Response.Write errMsg
 
    'If you don't specify an action, the form will post to the same page
    %>
    <form enctype="multipart/form-data" method="post">
    <table>
    <tr>
        <td><input type="textbox" name="date1" value="<%=dteUserDate%>"></td>
        <td><input type="textbox" name="date2" value="<%=dteUserDate2%>"></td>
        <td><input type="textbox" name="date3" value="<%=dteUserDate3%>"></td>
    </tr>
    <tr>
        <td>&nbsp&nbsp</td>
        <td width="100"><FONT FACE="Arial" SIZE="2" COLOR="#000000"><B>Upload Image</font></td>
        <TD BGCOLOR="#EEEEEE">            
 
        <INPUT TYPE="file" NAME="myFile" name="file1" SIZE="40">&nbsp&nbsp
        </td>
    </tr>
    <tr>
        <!--PS NEVER use "submit" as the NAME of a submit button!-->
        <input type=submit name=sub value="Submit">
    </tr>
    </table> 
    </form>
<%
end sub
%>

[lyealain]

[PHP]if request.form("SAVE")="AA" THEN

if request.form("plan3")="" then
msg="yoo"
else
response.redirect("login.asp")
end if
end if [/PHP]
i test a textbox in a form...
after submit..if left blank.. show yoo..
else go to login.asp..

but why it give error on
Microsoft VBScript runtime error '800a01a8'

Object required: 'response'

error at the response.redirect("Login.asp")

why arr??

[markrawlingson]

Drop the parantheses ( )

Response.Redirect "login.asp"