Does anyone have an example of the email Provisioning API in Classic
ASP? I am able to pass the credentials and get the Authorization back,
but I am stumped on how to get the user listing after that. I would
appriciate any help I can get, I really need to find a solution
quickly. Here is a sample of my code:
PostData = "Email=" & Server.URLEncode("[EMAIL PROTECTED]")
PostData = PostData & "&Passwd=" & Server.URLEncode("XXXXXXX")
PostData = PostData & "&accountType=HOSTED"
PostData = PostData & "&service=apps"
response.Write (PostData & "<br>")
On Error Resume Next
dim requestXmlHttp : set requestXmlHttp =
CreateObject("MSXML2.ServerXMLHTTP.3.0")
if requestXmlHttp Is Nothing Then
set requestXmlHttp = CreateObject("Microsoft.XMLHTT P")
if requestXmlHttp Is Nothing Then
response.Write("Couldn't Create XMLHTTP Object.<br
/><br />")
end if
end if
'equestXmlHttp.open "GET", "https://www.google.com/accounts/
ClientLogin?" & PostData & "", false
requestXmlHttp.send ""
response.ContentType="application/atom+xml"
Authorization ="GoogleLogin auth=" & requestXmlHttp.responseText
requestXmlHttp.open "GET", "https://www.google.com/a/feeds/
xxxxxxx.com/nickname/2.0/admin?" & requestXmlHttp & "", false
requestXmlHttp.send ""
strStatus = requestXmlHttp.Status
response.write(strStatus & "<BR>")
strRetval = requestXmlHttp.responseText
response.write(strRetval & "<BR>")
set requestXmlHttp = nothing
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups
"Google Apps APIs" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at
http://groups.google.com/group/google-apps-apis?hl=en
-~----------~----~----~----~------~----~------~--~---
