SQL Server
SQL Server
Google Translate Text
See more Google Translate Examples
Demonstrates how to use the Cloud Translation API to translate text from one spoken language to another. The example translates from English to Spanish.Chilkat SQL Server Downloads
-- Important: See this note about string length limitations for strings returned by sp_OAMethod calls.
--
CREATE PROCEDURE ChilkatSample
AS
BEGIN
DECLARE @hr int
-- Important: Do not use nvarchar(max). See the warning about using nvarchar(max).
DECLARE @sTmp0 nvarchar(4000)
DECLARE @success int
SELECT @success = 0
-- This example assumes the Chilkat API to have been previously unlocked.
-- See Global Unlock Sample for sample code.
-- --------------------------------------------------------------------------------
-- IMPORTANT:
-- Don't forget you need to 1st enable the Cloud Translation API in your Google Developers Console at https://console.cloud.google.com
-- --------------------------------------------------------------------------------
-- It is assumed we previously obtained an OAuth2 access token.
-- This example loads the JSON access token file
DECLARE @jsonToken int
EXEC @hr = sp_OACreate 'Chilkat.JsonObject', @jsonToken OUT
IF @hr <> 0
BEGIN
PRINT 'Failed to create ActiveX component'
RETURN
END
EXEC sp_OAMethod @jsonToken, 'LoadFile', @success OUT, 'qa_data/tokens/_googleTranslate.json'
IF @success <> 1
BEGIN
PRINT 'Failed to load _googleTranslate.json'
EXEC @hr = sp_OADestroy @jsonToken
RETURN
END
DECLARE @http int
EXEC @hr = sp_OACreate 'Chilkat.Http', @http OUT
EXEC sp_OAMethod @jsonToken, 'StringOf', @sTmp0 OUT, 'access_token'
EXEC sp_OASetProperty @http, 'AuthToken', @sTmp0
-- The following JSON is sent in the request body.
-- {
-- "q": "The quick brown fox jumped over the lazy dog.",
-- "source": "en",
-- "target": "es",
-- "format": "text"
-- }
DECLARE @json int
EXEC @hr = sp_OACreate 'Chilkat.JsonObject', @json OUT
-- The following code creates the JSON request body.
EXEC sp_OAMethod @json, 'UpdateString', @success OUT, 'q', 'The quick brown fox jumped over the lazy dog.'
EXEC sp_OAMethod @json, 'UpdateString', @success OUT, 'source', 'en'
EXEC sp_OAMethod @json, 'UpdateString', @success OUT, 'target', 'es'
EXEC sp_OAMethod @json, 'UpdateString', @success OUT, 'format', 'text'
EXEC sp_OASetProperty @json, 'EmitCompact', 0
EXEC sp_OAMethod @json, 'Emit', @sTmp0 OUT
PRINT @sTmp0
DECLARE @resp int
EXEC @hr = sp_OACreate 'Chilkat.HttpResponse', @resp OUT
EXEC sp_OAMethod @http, 'HttpJson', @success OUT, 'POST', 'https://translation.googleapis.com/language/translate/v2', @json, 'application/json', @resp
IF @success = 0
BEGIN
EXEC sp_OAGetProperty @http, 'LastErrorText', @sTmp0 OUT
PRINT @sTmp0
EXEC @hr = sp_OADestroy @jsonToken
EXEC @hr = sp_OADestroy @http
EXEC @hr = sp_OADestroy @json
EXEC @hr = sp_OADestroy @resp
RETURN
END
DECLARE @jResp int
EXEC @hr = sp_OACreate 'Chilkat.JsonObject', @jResp OUT
EXEC sp_OAMethod @resp, 'GetBodyJson', @success OUT, @jResp
EXEC sp_OASetProperty @jResp, 'EmitCompact', 0
PRINT 'Response Body:'
EXEC sp_OAMethod @jResp, 'Emit', @sTmp0 OUT
PRINT @sTmp0
DECLARE @respStatusCode int
EXEC sp_OAGetProperty @resp, 'StatusCode', @respStatusCode OUT
PRINT 'Response Status Code = ' + @respStatusCode
IF @respStatusCode >= 400
BEGIN
PRINT 'Response Header:'
EXEC sp_OAGetProperty @resp, 'Header', @sTmp0 OUT
PRINT @sTmp0
PRINT 'Failed.'
EXEC @hr = sp_OADestroy @jsonToken
EXEC @hr = sp_OADestroy @http
EXEC @hr = sp_OADestroy @json
EXEC @hr = sp_OADestroy @resp
EXEC @hr = sp_OADestroy @jResp
RETURN
END
-- Sample JSON response:
-- (Sample code for parsing the JSON response is shown below)
-- {
-- "data": {
-- "translations": [
-- {
-- "translatedText": "El zorro r�pida salt� sobre el perro perezoso."
-- }
-- ]
-- }
-- }
DECLARE @translatedText nvarchar(4000)
DECLARE @i int
SELECT @i = 0
DECLARE @n int
EXEC sp_OAMethod @jResp, 'SizeOfArray', @n OUT, 'data.translations'
WHILE @i < @n
BEGIN
EXEC sp_OASetProperty @jResp, 'I', @i
EXEC sp_OAMethod @jResp, 'StringOf', @translatedText OUT, 'data.translations[i].translatedText'
PRINT @translatedText
SELECT @i = @i + 1
END
EXEC @hr = sp_OADestroy @jsonToken
EXEC @hr = sp_OADestroy @http
EXEC @hr = sp_OADestroy @json
EXEC @hr = sp_OADestroy @resp
EXEC @hr = sp_OADestroy @jResp
END
GO