[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

More Google DOC's guessing-games



   Hi all,

   I am still working on sending a row insert to a Google spreadsheet. I
   am getting closer - at least now the server is answering with a 302
   redirect. I am looking for a more knowledgeable HTTPAPI guru make some
   suggestions on getting this working. I am not sure what to do with the
   302 response. I suspect it could be Google no allowing access to the
   GOOGLE FORM in this way. Debug log is attached.

   Using some input from a poster on [1]stackoverflow.com (below) on using
   a FORMRESPONSE method to send to Google without a Client Login or
   OAuth2 token.

   [2]How to write to a Google Spreadsheet from Excel 2003 VBA

   I setup a version of EXAMPLE4 to simulate sending a FORM to Google
   outside of using the callp to WEBFORM.

   Here is my code sippet:

   D data            S           1024A
   D QQ              C                   CONST(x'7F')
   D POST_TO         S           1024A
   INZ('[3]https://docs.google.com/a/rrd.c+
   D
   om/spreadsheet/formResponse?formkey=+
   D
   dGRwaG43Y2xiOWRmazFYeUdqX3BRZmc6M&i+
   D
   fq&ctok=9091786339820450096')
   D RequestHeader   C        CONST('"Content-Type","applicatio
   D
   -www-form-urlencoded')

    /free
       data = RequestHeader +
       QQ +'entry.0.single=' + QQ + 'column1'  +
       QQ +'entry.1.single=' + QQ + 'column2'  +
       QQ +'entry.2.single=' + QQ + 'column3'  +
       QQ +'entry.3.single=' + QQ + 'column4'  +
       QQ +'entry.4.single=' + QQ + 'column5'  +
       QQ +'entry.5.single=' + QQ + 'column6'  +
       QQ +'entry.6.single=' + QQ + 'column7'  +
       QQ +'entry.7.single=' + QQ + 'column8'  +
       QQ +'entry.8.single=' + QQ + 'column9'  +
       QQ +'entry.9.single=' + QQ + 'column10' +
       QQ +'&pageNumber=0&backupCache&submit=Submit'+QQ;

       rc=http_url_post(POST_TO
                        :%addr(data)
                        :%len(%trimr(data))
                        :'/tmp/httptest.html');

         if        rc <> 200;
           msg = http_error;
           dsply msg;
           return;

   ----------------------- VALUES IN DEBUG -------------------

   My POST_TO looks like this:

   [4]https://docs.google.com/a/rrd.com/spreadsheet/formResponse?f

   ormkey=dGRwaG43Y2xiOWRmazFYeUdqX3BRZmc6MQ&ifq&ctok=909178633

   9820450096

   and DATA :

   "Content-Type","application/x-www-form-urlencoded"[5]entry.0.si
   ngle="column1"entry.1.single="column2"entry.2.single="column
   3"entry.3.single="column4"entry.4.single="column5"[6]entry.5.si
   ngle="column6"entry.6.single="column7"entry.7.single="column
   8"entry.8.single="column9"entry.9.single="column10"&pageNumb
   er=0&backupCache&submit=Submit"

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

   Dave Hanneman | Technical Analyst III, Warehouse Business Systems | RR
   Donnelley
   3075 Highland Avenue | Downers Grove, IL 60515
   Office: 630.322.6420
   [7]dave.c.hanneman@xxxxxxx
   [8]http://www.rrdonnelley.com

References

   1. http://stackoverflow.com/
   2. http://stackoverflow.com/questions/9737354/how-to-write-to-a-google-spreadsheet-from-excel-2003-vba/9870311#9870311
   3. https://docs.google.com/a/rrd.c+
   4. https://docs.google.com/a/rrd.com/spreadsheet/formResponse?f
   5. http://entry.0.si/
   6. http://entry.5.si/
   7. mailto:dave.c.hanneman@xxxxxxx
   8. http://www.rrdonnelley.com/
HTTPAPI Ver 1.23 released 2008-04-24
OS/400 Ver V6R1M0

New iconv() objects set, PostRem=819. PostLoc=0. ProtRem=819. ProtLoc=0
http_url_post(): entered
http_persist_open(): entered
http_long_ParseURL(): entered
DNS resolver retrans: 2
DNS resolver retry  : 2
DNS resolver options: x'00000136'
DNS default domain: RRD.COM
DNS server found: 162.27.8.186
DNS server found: 172.24.8.126
DNS server found: 172.24.14.21
https_init(): entered
-------------------------------------------------------------------------------------
Dump of local-side certificate information:
-------------------------------------------------------------------------------------
-----BEGIN CERTIFICATE-----
MIIDkjCCAnqgAwIBAgIHUCE4pw6BsDANBgkqhkiG9w0BAQUFADCBizELMAkGA1UE
BhMCVVMxETAPBgNVBAgTCElsbGlub2lzMRYwFAYDVQQHEw1Eb3duZXJzIEdyb3Zl
MSMwIQYDVQQKExpXYXJlaG91c2UgQnVzaW5lc3MgU3lzdGVtczEMMAoGA1UECxMD
V0JTMR4wHAYDVQQDExVDT1JQREVWMiBSUkQgTG9jYWwgQ0EwHhcNMTIwODA2MTU0
NzUxWhcNMTgwMTI4MTU0NzUxWjCBhjELMAkGA1UEBhMCVVMxETAPBgNVBAgTCEls
bGlub2lzMRYwFAYDVQQHEw1Eb3duZXJzIEdyb3ZlMSMwIQYDVQQKExpXYXJlaG91
c2UgQnVzaW5lc3MgU3lzdGVtczEMMAoGA1UECxMDV0JTMRkwFwYDVQQDExBDb3Jw
ZGV2Mi5ycmQuY29tMIIBIjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEAsvmn
ECgsSyoP9D6iXmHJDJrUijBba/tEDes6tIdfAeB+Al6sdL5Xh74kj6ykTChlpYSu
yy8T1eWfUPDVk7zPYe/L53KfSQ6ky6Z8GvQntDQpqsq/2omgHTJfkxmcM4BxTP3o
9pzIC4aEAiqkT3wO/PwfBEweQzXzDtP5GJS8A2PfACR2H/vY+HonxiWRII121rkq
hkpJXJ0++5Akq86ENfJghT+lpswzbkT0Qr3uUmLAVEXFzeBvOgCT4lYWV6hyNd5g
t26WcGq4yIQDhUvixMeMm9n8z9K5oma7vc72qoJw27H/tOqTBOEbqF4Y1peEH/0m
n6anknTOlLcD6qsPKQIDAQABMA0GCSqGSIb3DQEBBQUAA4IBAQBuSvEAG2Mb3orN
zIKl4vcHOl7+NardlJ6kss+78V2QeCg58ICpZdO26n9L0bMcCBrL2Pr2WMvqXsWo
LK5HvVDxDAr64zgISvfg5FyjRxGNDQjmAhJThgzlvgm4EKaYpK1gqVdblSB7eorV
ygv43A66XHyNjAO3tZbT0C8/IWagGyolQxYJK1B9gyq4GX8uARDqEtw9BtOMuk53
kTA0nuAKylTTsBYmvjrl5S6b7b8pCtfPsd+936YaRSzDioRhs7NAhfMl91oSXrAO
DuWIvuL2ickKNlbkuV5J5gzj/UHMS+8gOCTBvNRHnOhaxIy/1v3FjYdJeLfAXEqE
zYYCu5+2
-----END CERTIFICATE-----
Serial Number: 50:21:38:A7:0E:81:B0
Common Name: Corpdev2.rrd.com
Country: US
State/Province: Illinois
Locality: Downers Grove
Org Unit: Warehouse Business Systems
Org: WBS
Issuer CN: CORPDEV2 RRD Local CA
Issuer Country: US
Issuer State/Province: Illinois
Issuer Locality: Downers Grove
Issuer Org: Warehouse Business Systems
Issuer Org Unit: WBS
Version: 03
not before: 20120806104751
not after: 20180128094751
pub key alg: 1.2.840.113549.1.1.5

-------------------------------------------------------------------------------------
Dump of server-side certificate information:
-------------------------------------------------------------------------------------
Cert Validation Code = 0
-----BEGIN CERTIFICATE-----
MIIF5DCCBU2gAwIBAgIKNiwTnAAAAABmHjANBgkqhkiG9w0BAQUFADBGMQswCQYD
VQQGEwJVUzETMBEGA1UEChMKR29vZ2xlIEluYzEiMCAGA1UEAxMZR29vZ2xlIElu
dGVybmV0IEF1dGhvcml0eTAeFw0xMjA4MDcxMjU4MDZaFw0xMzA2MDcxOTQzMjda
MGYxCzAJBgNVBAYTAlVTMRMwEQYDVQQIEwpDYWxpZm9ybmlhMRYwFAYDVQQHEw1N
b3VudGFpbiBWaWV3MRMwEQYDVQQKEwpHb29nbGUgSW5jMRUwEwYDVQQDFAwqLmdv
b2dsZS5jb20wgZ8wDQYJKoZIhvcNAQEBBQADgY0AMIGJAoGBAOLmgr2mRnqkiA6j
EEYGFXQvAw2kPHm0/VNClO96wwV7RFYeKDnkTBr9TN5z9AFdvifXfdKzD+SyZX5F
MH0rrb/jJfe/+Y2GCCuLM2OnFyyEWH17GNsq6NSEPOSZLynZU55BIEUbh5KuJv9K
fVCarkUArHnkmoHKqnKqsUcScM2TAgMBAAGjggO3MIIDszAdBgNVHSUEFjAUBggr
BgEFBQcDAQYIKwYBBQUHAwIwHQYDVR0OBBYEFITGKylZaAvWdIp6vdF/Nhb8J9wr
MB8GA1UdIwQYMBaAFL/AMOv1QxE+Z7qekfv8atrjaxIkMFsGA1UdHwRUMFIwUKBO
oEyGSmh0dHA6Ly93d3cuZ3N0YXRpYy5jb20vR29vZ2xlSW50ZXJuZXRBdXRob3Jp
dHkvR29vZ2xlSW50ZXJuZXRBdXRob3JpdHkuY3JsMGYGCCsGAQUFBwEBBFowWDBW
BggrBgEFBQcwAoZKaHR0cDovL3d3dy5nc3RhdGljLmNvbS9Hb29nbGVJbnRlcm5l
dEF1dGhvcml0eS9Hb29nbGVJbnRlcm5ldEF1dGhvcml0eS5jcnQwDAYDVR0TAQH/
BAIwADCCAn0GA1UdEQSCAnQwggJwggwqLmdvb2dsZS5jb22CCmdvb2dsZS5jb22C
DSoueW91dHViZS5jb22CC3lvdXR1YmUuY29tghYqLnlvdXR1YmUtbm9jb29raWUu
Y29tggh5b3V0dS5iZYILKi55dGltZy5jb22CDyouZ29vZ2xlLmNvbS5icoIOKi5n
b29nbGUuY28uaW6CCyouZ29vZ2xlLmVzgg4qLmdvb2dsZS5jby51a4ILKi5nb29n
bGUuY2GCCyouZ29vZ2xlLmZyggsqLmdvb2dsZS5wdIILKi5nb29nbGUuaXSCCyou
Z29vZ2xlLmRlggsqLmdvb2dsZS5jbIILKi5nb29nbGUucGyCCyouZ29vZ2xlLm5s
gg8qLmdvb2dsZS5jb20uYXWCDiouZ29vZ2xlLmNvLmpwggsqLmdvb2dsZS5odYIP
Ki5nb29nbGUuY29tLm14gg8qLmdvb2dsZS5jb20uYXKCDyouZ29vZ2xlLmNvbS5j
b4IPKi5nb29nbGUuY29tLnZugg8qLmdvb2dsZS5jb20udHKCDSouYW5kcm9pZC5j
b22CC2FuZHJvaWQuY29tghQqLmdvb2dsZWNvbW1lcmNlLmNvbYISZ29vZ2xlY29t
bWVyY2UuY29tghAqLnVybC5nb29nbGUuY29tggwqLnVyY2hpbi5jb22CCnVyY2hp
bi5jb22CFiouZ29vZ2xlLWFuYWx5dGljcy5jb22CFGdvb2dsZS1hbmFseXRpY3Mu
Y29tghIqLmNsb3VkLmdvb2dsZS5jb22CBmdvby5nbIIEZy5jb4INKi5nc3RhdGlj
LmNvbYIPKi5nb29nbGVhcGlzLmNuMA0GCSqGSIb3DQEBBQUAA4GBAKSXtaGJVVEJ
qTefGaDIbjJFssoVcABah26mQiGJBcmyWykJ57PT1+7PT3rxSJ/oiHyA3LypyZC9
DHZxnLMUi7Y669ezXuzBZ/6OJrLnfVSiqm2k0yt6Zu+1n0E/xBrkypPcCto8T+sG
1EFJVBzCDkp7b3fmKiSCp1PfrWlSyYuM
-----END CERTIFICATE-----
Serial Number: 36:2C:13:9C:00:00:00:00:66:1E
Common Name: *.google.com
Country: US
State/Province: California
Locality: Mountain View
Org Unit: Google Inc
Issuer CN: Google Internet Authority
Issuer Country: US
Issuer Org: Google Inc
Version: 03
not before: 20120807075806
not after: 20130607144327
pub key alg: 1.2.840.113549.1.1.5

Protocol Used: TLS Version 1
http_persist_post(): entered
http_long_ParseURL(): entered
do_post(): entered
POST /a/rrd.com/spreadsheet/formResponse?formkey=dGRwaG43Y2xiOWRmazFYeUdqX3BRZmc6MQ&ifq&ctok=9091786339820450096 HTTP/1.1
Host: docs.google.com
User-Agent: http-api/1.23
Content-Type: text/xml
Expect: 100-continue
Content-Length: 331


recvresp(): entered
SetError() #43: CommSSL_Read:  time-out!
senddoc(): entered
"Content-Type","application/x-www-form-urlencoded"entry.0.single="column1"entry.1.single="column2"entry.2.single="column3"entry.3.single="column4"entry.4.single="column5"entry.5.single="column6"entry.6.single="column7"entry.7.single="column8"entry.8.single="column9"entry.9.single="column10"&pageNumber=0&backupCache&submit=Submit"
recvresp(): entered
HTTP/1.1 302 Moved Temporarily
Content-Type: text/html; charset=UTF-8
X-Robots-Tag: noindex, nofollow, nosnippet
Location: https://docs.google.com/a/rrd.com/spreadsheet/formResponse?formkey=dGRwaG43Y2xiOWRmazFYeUdqX3BRZmc6MQ&ifq&ctok=9091786339820450096&ctok=7400413672568023419
Date: Thu, 16 Aug 2012 23:59:56 GMT
Expires: Thu, 16 Aug 2012 23:59:56 GMT
Cache-Control: private, max-age=0
X-Content-Type-Options: nosniff
X-XSS-Protection: 1; mode=block
Server: GSE
Transfer-Encoding: chunked


SetError() #13: HTTP/1.1 302 Moved Temporarily
recvdoc parms: chunked 0
header_load_cookies() entered
recvchunk(): entered
get_chunk_size(): entered
15d

chunk size = 349
get_chunk_size returned 349
calling comm_blockread
<HTML>
<HEAD>
<TITLE>Moved Temporarily</TITLE>
</HEAD>
<BODY BGCOLOR="#FFFFFF" TEXT="#000000">
<H1>Moved Temporarily</H1>
The document has moved <A HREF="https://docs.google.com/a/rrd.com/spreadsheet/formResponse?formkey=dGRwaG43Y2xiOWRmazFYeUdqX3BRZmc6MQ&amp;ifq&amp;ctok=9091786339820450096&amp;ctok=7400413672568023419";>here</A>.
</BODY>
</HTML>

comm_blockread returned 349


get_chunk_size(): entered
0

chunk size = 0
get_chunk_size returned 0
SetError() #13: HTTP/1.1 302 Moved Temporarily
http_close(): entered
-----------------------------------------------------------------------
This is the FTPAPI mailing list.  To unsubscribe, please go to:
http://www.scottklement.com/mailman/listinfo/ftpapi
-----------------------------------------------------------------------