Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Microsoft SQL Server Новый топик    Ответить
 пронумеровать строки в DTS  [new]
valru
Member

Откуда:
Сообщений: 27
Необходимо пронумеровать строки в поле id
в dts использую activexScript не работает globalVar
Что не так
*********
' Visual Basic Transformation Script
' Copy each source column to the
' destination column
***********

Function Main()

dim mm
DTSDestination("id") = mm+1
DTSDestination("NDOG") = DTSSource("NDOG")
set mm = DTSDestination("id")
Main = DTSTransformStat_OK
End Function

во всех строках значение 1
4 фев 05, 10:18    [1299432]     Ответить | Цитировать Сообщить модератору
 Re: пронумеровать строки в DTS  [new]
Glory
Member

Откуда:
Сообщений: 104760
не работает globalVar\
Это - dim mm - не GlobalVariable
4 фев 05, 10:26    [1299458]     Ответить | Цитировать Сообщить модератору
 Re: пронумеровать строки в DTS  [new]
valru
Member

Откуда:
Сообщений: 27
а как сделать чтоб предыдущее значение сохранялось в переменной
4 фев 05, 10:29    [1299476]     Ответить | Цитировать Сообщить модератору
 Re: пронумеровать строки в DTS  [new]
Glory
Member

Откуда:
Сообщений: 104760
valru
а как сделать чтоб предыдущее значение сохранялось в переменной

Ну так надо создать DTS GlobalVariable. В свойствах пакета.
4 фев 05, 10:32    [1299484]     Ответить | Цитировать Сообщить модератору
 Re: пронумеровать строки в DTS  [new]
valru
Member

Откуда:
Сообщений: 27
ошибки дальше

Function Main()
dim nom As Integer // ошибка здесь
…..

или

Function Main()
dim nom

nom=DTSGlobalVariables("mm").value //mm=0 integer
DTSDestination("id") = nom //ошибка здесь
DTSDestination("NDOG") = DTSSource("NDOG")
DTSGlobalVariables("mm").Value = DTSDestination("id")
Main = DTSTransformStat_OK
End Function
4 фев 05, 11:58    [1299796]     Ответить | Цитировать Сообщить модератору
 Re: пронумеровать строки в DTS  [new]
ruslrain
Member

Откуда:
Сообщений: 114
valru
ошибки дальше

Function Main()
dim nom As Integer // ошибка здесь
…..

или

Function Main()
dim nom

nom=DTSGlobalVariables("mm").value //mm=0 integer
DTSDestination("id") = nom //ошибка здесь
DTSDestination("NDOG") = DTSSource("NDOG")
DTSGlobalVariables("mm").Value = DTSDestination("id")
Main = DTSTransformStat_OK
End Function


Я что-то не понял :
nom=DTSGlobalVariables("mm").value
а вот это зачем:
DTSGlobalVariables("mm").Value = DTSDestination("id")
может быть вот так вот:
DTSGlobalVariables("mm").Value=nom+1
4 фев 05, 13:40    [1300272]     Ответить | Цитировать Сообщить модератору
Все форумы / Microsoft SQL Server Ответить