Hi,

I have just tried it from several PC's with both MS IE 6.0 and Mozilla Firefox
from home and it works fine here ...

do you get any messages, I can see an error req. has been made within 20 the
last 18 min.

rgds
 


"K. Schreur" <[EMAIL PROTECTED]>
Sent by: [email protected]

24-03-2006 22:53

Please respond to
[email protected]

To
[email protected]
cc
Subject
Re: [Easy400Group] Simple AJAX and iSeries Form Sample





I tried it and it didn't work.
----- Original Message -----
From: [EMAIL PROTECTED]
To: [email protected]
Sent: Friday, March 24, 2006 4:50 PM
Subject: [Easy400Group] Simple AJAX and iSeries Form Sample


Hi,


here is a simple HTML that submits a form with AJAX and calls

a program with parameters and outputs the result on the page


http://www.way2trade.dk/w600websam/ajax3.htm

Be aware that my server is in Europe GMT+1 and may be down

due to backup and IPL


WEB RESOURCES:

http://developer.mozilla.org/en/docs/AJAX:Getting_Started
http://www.captain.at/howto-ajax-form-post-request.php




Program AJAX4P

--------------

H DatFmt(*eur)                                                    

/copy qrpglesrc,hspecs                                          
/copy qrpglesrc,hspecsbnd                                        

/copy qrpglesrc,prototypeb                                      
/copy qrpglesrc,usec                                            
/copy qrpglesrc,variables3                                      
d web_page        s            128                                

d name            s             50                                

d address         s             50                                

/copy qrpglesrc,prolog3                                          

                                                                 
c                   eval      web_page    = %trim('/w600websam/')
c                                         + 'ajax4.htm'          
                                                                 
c                   callp     gethtmlIFS(web_page:'<as400>')      

                                                                 
c                   eval      name        = zhbgetvar('name')  
c                   callp     UpdHtmlVar('NAME':name)          
c                   eval      address     = zhbgetvar('address')

c                   callp     UpdHtmlVar('ADDRESS':address)    
                                                               
c                   callp     wrtsection('noname')              

c                   callp     wrtsection('*fini')              
                                                               
c                   return                                      


HTML AJAX4:

------------

Content-type: text/html


This is the response from iSeries:

<br>

Your name are /%name%/

<br>

Your Address are /%address%/



YAHOO! GROUPS LINKS






YAHOO! GROUPS LINKS




Reply via email to