 | |
Предыдущие результаты
 Получить общую информацию о RSBizWare можно здесь:
[url]http://literature.rockwellautomation.com/idc/groups/literature/documents/br/bizwar-br001_-en-p.pdf[/url]
или можно зайти непосредственно на сайт продукта [url]www.rsbizware.com[/url]
По генерации отчётов можно посмотреть продукт Microsoft Reporting Services Add-On к MS SQL Server, который явл. компонентом MS Visiual Studio .NET:
[url]http://www.microsoft.com/sql/technologies/reporting/default.mspx[/url]
|
[quote:bb7269b57f]как средствами MS SQL Server, MS Visiual Studio .NET и MS Reporting Services под MS Windows 2003 Server за полчаса строить аппликации генерирования рапортов любых видов, размеров и конфигураций[/quote:bb7269b57f]
а поподробнее можно? или ссылки на информацию?
а то через rssql в БД тэги гнать получается, а вот как их потом анализировать и представлять в отчеты?
и че это за зверь такой RSBizWare? че он может?
|
Вообще, для работы с базами данных есть совершенно другие специально для этого предназначенные программные средства, не RSView :)
Можно сложить логи на сервер и обрабатывать их чем угодно - есть куча программных средств. Rockwell Software как раз вчера проводил Workshop как средствами MS SQL Server, MS Visiual Studio .NET и MS Reporting Services под MS Windows 2003 Server за полчаса строить аппликации генерирования рапортов любых видов, размеров и конфигураций :) Это с помощью продуктов MS.
А у RS есть для этого RSBizWare.
|
Через Event, по условию {system\Second}/5 == {system\Second}%5
вызываешь. Попробуй так должно работать. Сам такое не делал.
|
Это вряд ли.
Скорее всего, придётся делать всё заново для новой панели.
Или купить новую панель Christ, в чём проблема.
|
Пробовали на машине под Windows 2000 с установленным линкс 2.41 и даже 2.43
записать данные в тэг, десятичная часть отбрасывается.
При этом, если записывать через Excel, то все нормально проходит.
Коды записи -
Visual Basic 6.0
Text1 - текстовое окно
Command1 - кнопка
test_dde- топик
[code:1:c6023a08f3]Private Sub Command1_Click()
Text1.LinkTopic = "RSLINX|test_dde"
Text1.LinkMode = vbLinkManual
Text1.LinkItem = "Program:MainProgram.X_Arr_Data[1].Data[2],L1,C1"
Text1 = Replace(Val(Text1), ".", ",")
Text1.LinkPoke
End Sub[/code:1:c6023a08f3]
Запись проходит, если разделитель в значении исключительно "," хотя
разделитель в системе может быть любым.
----------------------------------------------------------------------------
Visual Basic Excel (VBA)
[code:1:c6023a08f3]Public Sub a1()
Dim a As Long, rangeToPoke, er
a = Application.DDEInitiate("RSLINX", "test_dde") ' DDE подключение
Set rangeToPoke = Application.Worksheets("Лист1").Range("A2") ' ячейка
со значением на запись
Application.DDEPoke a,
"Program:MainProgram.X_arr_Data[1].Data[2],L1,C1", rangeToPoke ' Вставка
данных
er = Application.DDEAppReturnCode ' Обработка ошибки
End Sub
[/code:1:c6023a08f3]
При это запись осуществляется только если писать значение из какой-либо
ячейки, просто значение не записывается.
Запись проходит, если разделитель в значении исключительно "," хотя
разделитель в системе может быть любым. А если запись не проходит, то код ошибки все равно не возвращается
----------------------------------------------------------------------------
Вот и понять не можем в чем причина, а работать с топиками из среды
разработки очень хочется.
Может бы сталкивались с подобным?
Может быть есть альтернативы работать с топиками из VB6 / VB.Net
|
[code:1:8e5bc4a73b]Sub prb()
Dim p As String, n As String
n = InputBox("", "")
p = "C:\Temp\" & n
MsgBox p
MkDir (p)
End Sub[/code:1:8e5bc4a73b]
Только что ради интереса проверил - всё замечательно работает.
MS Windows XP + SP2
RSView v7.10.00 (CPR6)
[quote:8e5bc4a73b]в MS VB 6 все отлично, а под RS View ни в какую. Shocked Confused[/quote:8e5bc4a73b]
А что пишет?
|
или вот такая элементарщина проверки ради
Sub prb()
Dim p As String, n As String
n = InputBox("", "")
p = "e:\temp\" & n
MsgBox p
MkDir (p)
End Sub
в MS VB 6 все отлично, а под RS View ни в какую. 8O :?
|
Для связи со смежной системой(передачи им некоторых значений тэгов) используется простейший скриптик:
Public Sub To_Mak()
Dim F_prg As Tag, p1 As String
p1 = "e:\temp\gaz.txt"
On Error GoTo lable1
Set F_prg = gTagDb("prg\rmain")
Open p1 For Append As #1
Print #1, F_prg
Close #1
Exit Sub
lable1:
MsgBox Err.Description
Resume Next
End Sub
Так вот на некоторых станциях он выполняестя нормально, а на некоторых( при видимой одинаковости условий)выдает ошибки:
"File not found" "Bad file name or number".
Сталкивался ли кто нибудь с чем то подобным!?помогите,плиз.
зы. "нормальные станции"
- RS View32 7.10, office XP
-RS View32 6.30, office 2000
"ненормальные:) станции"
-RS View32 7.10, office XP
-RS View32 7.10, office 2003
все "офисы" со своим VBA, на всех станциях стои MS Visual Basic 6 pro
|
Привет народ :) !
Боюсь показатся совсем не образованным,но вот такой вопрос.
Есть проэкт от панели Christ Elektronik,файл с расширением *.crd.
Есть ли какая то вероятность что его можно с конвертировать для PanelView.Софт для создания пректов и загрузки на понели Christ
есть но панель вышла из строя,возникла такая вот необходимость.
|
Предыдущие результаты
Ещё результаты |
|
| |
|
