Я новичок в Бейсике и пытаюсь написать макрос в Visual Basic для своей работы.Макрос войдет в нашу базу данных iSeries, найдет номера позиций для наших продуктов и назначит для них новые цены.Я застрял при попытке прочитать число из программного обеспечения AS400.
Процесс идет примерно так: пользователь вводит номера товаров и их новые цены.Затем макрос попадает в базу данных, и я создал циклы, которые позволяют макросу просматривать базу данных в поисках номера элемента, который выглядит следующим образом:
Sub UpdatePrice(ItemNum,Price)
'Here, I need to read the item number in AS400 and assign it to the variable, Int
If Int = ItemNum Then
'Change the price
Else Int != ItemNum Then
'Go to the next line and read the ItemNum
End If Int = [blank]
'End macro because ItemNum was not found in AS400
Я не уверен, возможно ли это вообщепотому что мы используем Excel для создания кода, который мы вставляем в текстовый файл, который читает программа.Единственный другой макрос, который мы используем, не читает из программного обеспечения, только очень быстро нажимает клавиши.