ReSQL.ru
     
powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / файл со скульным запросом, отправить на сервер КАК?
6 сообщений из 6, страница 1 из 1
файл со скульным запросом, отправить на сервер КАК?
    #38568519
bombaztik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bombaztik
Гость
Всем привет, тема такая, есть file.sql лежит локально на машине, в нем запрос к MS SQL, как его прочитать\перенаправить к северу? Дело в том что сам запрос не к конкретной таблице, а к нескольким и после него формируется нужное.

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
Private Sub Workbook_Open()

Set ObjRecordset = CreateObject("ADODB.Recordset")
ServerName = "(local)"
DSN = "sql_TEST"
UID = "user"
PWD = "12345"
ConnectString = "Provider=SQLOLEDB;" & _
                "Data Source=" & ServerName & _
                ";Initial Catalog=" & DSN & _
                ";UID=" & UID & ";PWD=" & PWD
                
ObjRecordset.ActiveConnection = ConnectString
ObjRecordset.Source = "select * from cp_ControlPoints"
ObjRecordset.Open

MsgBox ObjRecordset.GetString

End Sub



Модератор: Учимся использовать тэги оформления кода - FAQ

Что прописать вместо "select * from cp_ControlPoints" чтобы читал из file.sql ???
...
Рейтинг: 0 / 0
21.02.2014, 10:57
| Ответить | Цитировать | Написать  
файл со скульным запросом, отправить на сервер КАК?
    #38568521
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
Нужно считать содержимое файла в переменную и вместо "select * from" подставить ее.
...
Рейтинг: 0 / 0
21.02.2014, 10:59
| Ответить | Цитировать | Написать  
файл со скульным запросом, отправить на сервер КАК?
    #38568537
bombaztik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bombaztik
Гость
Я извиняюсь, а как считать в VB я НОЛЬ(
...
Рейтинг: 0 / 0
21.02.2014, 11:09
| Ответить | Цитировать | Написать  
файл со скульным запросом, отправить на сервер КАК?
    #38568543
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
Public Function ReadFile(path As String) As String
Dim r() As Byte
    Open path For Binary As #1
    ReDim r(LOF(1) - 1)
    Get #1, , r
    Close #1
    ReadFile = StrConv(r, vbUnicode)
End Function
...
Рейтинг: 0 / 0
21.02.2014, 11:13
| Ответить | Цитировать | Написать  
файл со скульным запросом, отправить на сервер КАК?
    #38568561
bombaztik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bombaztik
Гость
Вместо path путь до файла указывать?
...
Рейтинг: 0 / 0
21.02.2014, 11:25
| Ответить | Цитировать | Написать  
файл со скульным запросом, отправить на сервер КАК?
    #38568717
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
Код: vbnet
1.
ObjRecordset.Source = ReadFile("c:\sql.txt")
...
Рейтинг: 0 / 0
21.02.2014, 13:10
| Ответить | Цитировать | Написать  
6 сообщений из 6, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / файл со скульным запросом, отправить на сервер КАК?
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?desktop=1&fid=60&tid=2156499]:
 0ms
get settings:
 11ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 47ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 49ms
get tp. blocked users:
 2ms
others: 14ms
total:  160ms
созд. / загр.: 160ms
x
x
Закрыть


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