El AppleScript código:
on dialogBox(theMessage)
display dialog theMessage default answer "" buttons {"Cancel", "Search"} default button 2 with title "Pick a search engine"
end dialogBox
dialogBox("Google, YouTube, Wiki, Dictionary, Apple, Adobe, or Google Images")
if text returned of result = "Google" then
set search to text returned of dialogBox("Enter Google Search")
tell application "Google Chrome"
activate
open location "https://www.google.com/?gfe_rd=cr&ei=4fJgVJ6SM8yD8QfJjYGICA&gws_rd=ssl,cr&fg=1#q=" & search
end tell
else if text returned of result = "YouTube" then
set search to text returned of dialogBox("Enter YouTube Search")
tell application "Google Chrome"
activate
open location "https://www.youtube.com/results?search_query=" & search
end tell
else if text returned of result = "Wiki" then
set search to text returned of dialogBox("Enter Word")
tell application "Google Chrome"
activate
open location "http://en.wikipedia.org/wiki/" & search
end tell
else if text returned of result = "Dictionary" then
set search to text returned of dialogBox("Enter Word")
tell application "Google Chrome"
activate
open location "http://Dictionary.Reference.Com/Browse/" & search
end tell
else if text returned of result = "Apple" then
set search to text returned of dialogBox("Enter Apple Search")
tell application "Google Chrome"
activate
open location "http://www.apple.com/search/?q=" & search
end tell
else if text returned of result = "Adobe" then
set search to text returned of dialogBox("Enter Adobe Search")
tell application "Google Chrome"
activate
open location "http://www.adobe.com/cfusion/search/index.cfm?term=" & search
end tell
else if text returned of result = "Google Images" then
set search to text returned of dialogBox("Enter Image Search")
tell application "Google Chrome"
activate
open location "https://www.google.ca/search?site=imghp&tbm=isch&source=hp&biw=1920&bih=890&q=" & search
end tell
end if
El Problema:
En la parte superior que dice ("Google, YouTube, Wiki, Diccionario, Apple, Adobe, o en Imágenes de Google")
Quiero hacer lo que pone un signo de interrogación al final, así: ("Google, YouTube, Wiki, Diccionario, Apple, Adobe, o de Imágenes de Google?")
Las Imágenes de Google tiene un signo de interrogación, pero cuando yo tipo "Google Imágenes" en el cuadro de texto, se cierra. Alguien puede ayudarme para que yo pueda tipo de Imágenes de Google con el signo de interrogación y el programa no se cierra?
