ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft SQL Server [игнор отключен] [закрыт для гостей] / DTS
3 сообщений из 3, страница 1 из 1
DTS
    #32020171
sardinka
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sardinka
Гость
Ya ispolsyu code nishe v DTS pakage. Po kakoito prichine na deklarazii peremennuh ya polychau oshibky. Pochemy?
----------------------------------------
Dim K As Integer
Dim T As String
K = 0
T = DTSSourse("Test")
If Len(T) < 10 Then
For K = 1 To 10
If Len(T) = 10 Then
Exit For
End If
T = "0" & T
Next K
DTSDestination("Test")= T
End If
...
Рейтинг: 0 / 0
03.01.2002, 20:05
| Ответить | Цитировать | Написать  
DTS
    #32020172
olegusan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
olegusan
Гость
Была ошибка синтаксиса VB для Dim и Next. Вот так должно работать.
---------------------------
Dim K
Dim T
K = 0
T = DTSSourse("Test")
If Len(T) < 10 Then
For K = 1 To 10
If Len(T) = 10 Then
Exit For
End If
T = "0" & T
Next
DTSDestination("Test")= T
End If
...
Рейтинг: 0 / 0
03.01.2002, 22:46
| Ответить | Цитировать | Написать  
DTS
    #32020173
olegusan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
olegusan
Гость
А вообще, проще было сделать так:

DTSDestination("Test")=string(10-len(DTSSourse("Test")),"0") & DTSSourse("Test")
...
Рейтинг: 0 / 0
04.01.2002, 00:30
| Ответить | Цитировать | Написать  
3 сообщений из 3, страница 1 из 1
Форумы / Microsoft SQL Server [игнор отключен] [закрыт для гостей] / DTS
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]