|
Here is my program *Retrieve input from web fields C CallP #GetEnv(EnvRec:EnvLen:'CONTENT_LENGTH') C Eval RcvLen = #cton(EnvRec) C CallP #RdStin(RcvRec:RcvLen) * *Convert enviornmental veriables to external data structure C ExSr $CvtDB * Here is my Sub Procedure for #GetEnv: P #GetEnv B Export *====================================================================* D #GetEnv PI D EnvRec 1024 D EnvLen 9B 0 D EnvName 64 Value * D EnvRecLen S 9B 0 Inz(%size(EnvRec)) D EnvNameLen S 9B 0 C Eval EnvNameLen = %len(%trim(EnvName)) * C CallB 'QtmhGetEnv' C Parm EnvRec C Parm EnvRecLen C Parm EnvLen C Parm EnvName C Parm EnvNameLen C Parm WPError *====================================================================* P #GetEnv E Here is my Sub Procedure for #RdStin: P #RdStin B Export *====================================================================* D #RdStin PI D RcvRec 1024 D RcvLen 9B 0 * D RcvRecLen S 9B 0 *====================================================================* C CallB 'QtmhRdStin' C Parm RcvRec C Parm RcvLen C Parm RcvRecLen C Parm WPError * *====================================================================* P #RdStin E ----- Original Message ----- From: "Joel R. Cochran" <jrc@masi-brac.com> To: <web400@midrange.com> Sent: Friday, April 19, 2002 2:59 PM Subject: RE: [WEB400] read Standard In Problems > Justin, > > Post the part of your CGI program where you try to bring the form data in... > > Joel R. Cochran > Director of Internet Services > VamaNet.com > (800)480-8810 > mailto:webmaster@vamanet.com > > > > -----Original Message----- > > From: Justin Houchin [mailto:jhouchin9@charter.net] > > Sent: Friday, April 19, 2002 2:04 PM > > To: web400@midrange.com > > Subject: [WEB400] read Standard In Problems > > > > > > This is a multi-part message in MIME format. > > -- > > [ Picked text/plain from multipart/alternative ] > > I have to fields, here is my HTML: > > > > <body bgcolor="#FFFFFF" text="#000000"> > > <form action="/cgi-bin/LOGIN" method="post"> > > <div align="center"><center><table> > > <tr> > > <td>UserId</td> > > <td><input type="text" name="USERID" size=50></td> > > </tr> > > <tr> > > <td>password</td> > > <td><input type="password" name="UPASS" size=50></td> > > </tr> > > </table> > > </center></div><div align="center"><center><p><input > > type="submit" value="Log In"></p> > > </center></div> > > </form> > > </body> > > </html> > > > > I have a breakpoint set in my CGi program on the subprocedure > > #GetEnv, No data is getting into the Subprocedure therefore > > no data to do a #CvtDb. And my HTTP is set up for POST/GET. > > Any Ideas? > > > > Thanks, > > Justin Houchin > > Programmer > > Reliatek, Inc > > _______________________________________________ > > This is the Web Enabling the AS400 / iSeries (WEB400) mailing list > > To post a message email: WEB400@midrange.com > > To subscribe, unsubscribe, or change list options, > > visit: http://lists.midrange.com/cgi-bin/listinfo/web400 > > or email: WEB400-request@midrange.com > > Before posting, please take a moment to review the archives > > at http://archive.midrange.com/web400. > > > _______________________________________________ > This is the Web Enabling the AS400 / iSeries (WEB400) mailing list > To post a message email: WEB400@midrange.com > To subscribe, unsubscribe, or change list options, > visit: http://lists.midrange.com/cgi-bin/listinfo/web400 > or email: WEB400-request@midrange.com > Before posting, please take a moment to review the archives > at http://archive.midrange.com/web400. > >
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
midrange.com
