Установите порт принтера и принтер TCP / IP со сценарием, пользователь вводит IP [дубликат]

UI_USER_INTERFACE_IDIOM () возвращает iPad только в том случае, если приложение предназначено для iPad или Universal. Если его приложение iPhone работает на iPad, это не будет. Поэтому вы должны проверить модель.

4
задан duper 29 June 2012 в 18:46
поделиться

3 ответа

Хорошо, я обновляю этот вопрос. Он, наконец, работает со всей вашей помощью, ребята. Благодарю. Вот как я вызвал vbscript и передал ему параметр:

cscript //nologo fail_mail.vbs something.sql 'something.sql is the param. that i'm passing.

Вот как выглядит мой vbscript для почты:

Const ForReading = 1

Set args = WScript.Arguments
arg1 = args.Item(0)  'the parameter from batch comes in here to arg1
...
...
ToAddress = "my@address.com"
MessageSubject = "WORKED"
MessageBody = "Success" 
MessageAttachment = ""&arg1&""  'here those quotes are important. dk why.
Set ol = WScript.CreateObject("Outlook.Application")
Set ns = ol.getNamespace("MAPI")
Set newMail = ol.CreateItem(olMailItem)
newMail.Subject = MessageSubject
newMail.Body = MessageBody & vbCrLf & MyTime
newMail.RecipIents.Add(ToAddress)
newMail.Attachments.Add(MessageAttachment)
newMail.Send

И он работает. * Можно использовать несколько параметров, используя ту же технику.

3
ответ дан duper 17 August 2018 в 18:15
поделиться

Чтобы ответить на вопрос ...

, вызовите ваш сценарий таким образом:

cscript //nologo success_mail_DEV.vbs  ARG1  ARG2

Обработать аргументы в vbscript через WScript.Arguments .


Но могу ли я также предположить, что вы можете полностью удалить пакетную часть системы.

VBSCript отлично способен вызывать FINDSTR и обрабатывать выходные данные. Или на самом деле вы можете реализовать поиск целиком в VBScript без необходимости вообще вызывать FINDSTR.

5
ответ дан Cheeso 17 August 2018 в 18:15
поделиться
  • 1
    Спасибо за быстрый ответ. Я проверил эту ссылку, которую вы мне прислали. Благодарю. Но, не работая, все еще. Есть идеи? Я только что редактировал свой первоначальный вопрос с моими изменениями, которые я сделал. – duper 29 June 2012 в 18:37
  • 2
    неважно. спасибо за первый ввод, хотя. Все хорошо и работает. – duper 29 June 2012 в 18:51

Ваш VBScript нуждается в некотором коде для принятия аргументов, например:

set args = WScript.Arguments
' Parse args
select case args.Count
case 0
    help
case 1
    sVariable = args(0)
end select

Когда вы вызываете свой VBScript, просто передайте аргумент arg скрипту, как если бы вы выполнили команду:

cscript //nologo MyScript.vbs arg
0
ответ дан Patrick Cuff 17 August 2018 в 18:15
поделиться
  • 1
    до сих пор нет успеха. Я только что редактировал мой оригинальный вопрос. – duper 29 June 2012 в 18:36
  • 2
    неважно. Объясните это. Благодарю. – duper 29 June 2012 в 18:50
Другие вопросы по тегам:

Похожие вопросы: