Re: [Easy400Group] Simple AJAX and iSeries Form Sample - TEST RESPONSE PLEASE

[hr]

Hi,

Yesterday i posted an AXAJ sample and
got a response from Kevin
that it didn't work, the sample is
on this link ....

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


I now had it tested from several locations
in DK with pure positive 
results. Afterwards I made som minor
changes according to XHTML rules
(<br> should be <br/> etc).

Could anybody in the group please see
if it works and you get the
servers response on screen or not and
then reply the result with
browser type and version to me directly
on the above e-mail (only 
not to fill the forum)

Thanks
Henrik







[EMAIL PROTECTED] 
Sent by: Easy400Group@yahoogroups.com
24-03-2006 22:50



Please respond to
Easy400Group@yahoogroups.com





To
Easy400Group@yahoogroups.com


cc



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



 Visit your group "Easy400Group"
on the web.
  
 To unsubscribe from this group, send an email
to:
 [EMAIL PROTECTED]
  
 Your use of Yahoo! Groups is subject to the
Yahoo!
Terms of Service.






  




  
  
  YAHOO! GROUPS LINKS



   Visit your group "Easy400Group" on the web. 
   To unsubscribe from this group, send an email to: [EMAIL PROTECTED] 
   Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.