powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Как взять данные с SQL Server ?
12 сообщений из 12, страница 1 из 1
Как взять данные с SQL Server ?
    #32397630
Наталия
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Привет всем :)
Помогите пожалуйста, у меня есть свободная таблица VFP, И таблица на SQL Servere с данными. Пыталась сначала через Linked Server, он ругается на блоб поля, посоветовали поставить VFP и залить данные из него с сервера.
VFP поставила, а вот с чем его едят :( помогите пожалуйста, как присоединить в VFP таблицу сервера ? и если можно как вставить данные ? Insert Transact-SQL сервера и VFP различается ?? или нет
Извините, если вопрос звучит глупо, но VFP вижу первый раз а данные слить нужно срочно !
...
Рейтинг: 0 / 0
Как взять данные с SQL Server ?
    #32397648
Crip
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Где то так
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
lcDSNLess= "DRIVER = {SQL Server};"  ; 
+  "SERVER=<servername>;"  ;
+  "UID=<userid>;"  ;
+  "PWD=<password>;"  ;
+  "DATABASE=PUBS;"  ;
+  "WSID=<machine name or userid>;"  ;
+  "APP=MicroX(R) Sample App" 
lnConnHandle=SQLSTRINGCONNECT(m.lcDSNLess)
=SQLEXEC(lnConnHandle, "SELECT * FROM SomeMSSQLTable" , "VFPCursor" )
=SQLDISCONNECT(lnConnHandle)
BROWSE LAST
...
Рейтинг: 0 / 0
Как взять данные с SQL Server ?
    #32397660
Фотография 1024
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
или так (можно прям в командном окне построчно выполнять)

hnd=sqlconnect('DSN настроенный на тот сервер с которого брать данные')
sqlexec(hnd,'select * from таблица на сервере','mydata')
select mydata
copy to c:\myfile type fox2x

сохранит в формате старого дбф который в екселе можно открыть (но мемо поля ексель не читает никак).

если что-то не так то набрать

? message()

он скажет что именно не так
...
Рейтинг: 0 / 0
Как взять данные с SQL Server ?
    #32397701
Наталия
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Crip:lcDSNLess="DRIVER = {SQL Server};" ;
+ "SERVER=<servername>;" ;
+ "UID=<userid>;" ;
+ "PWD=<password>;" ;
+ "DATABASE=PUBS;" ;
+ "WSID=<machine name or userid>;" ;
+ "APP=MicroX(R) Sample App"
lnConnHandle=SQLSTRINGCONNECT(m.lcDSNLess)
=SQLEXEC(lnConnHandle,"SELECT * FROM SomeMSSQLTable","VFPCursor")
=SQLDISCONNECT(lnConnHandle)
BROWSE LAST

Спасибо :) курсор открылся (данные вижу) но вот как его дальше использовать ? при закрытии он пропадает совсем, в проекте никак не прикрепляется ... помогите пожалуйста, как к нему обращаться ?
как вставить данные из него в таблицу VFP ?
...
Рейтинг: 0 / 0
Как взять данные с SQL Server ?
    #32397760
Ab________1212__
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Select * From VFPCursor Into table c:\mytable.dbf
...
Рейтинг: 0 / 0
Как взять данные с SQL Server ?
    #32397761
oleg_km
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Дальше так:
SELECT * FROM VFPCursor INTO TABLE MyTable
...
Рейтинг: 0 / 0
Как взять данные с SQL Server ?
    #32397768
Crip
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вам же пояснили
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
lcDSNLess= "DRIVER = {SQL Server};"  ; 
+  "SERVER=<servername>;"  ;
+  "UID=<userid>;"  ;
+  "PWD=<password>;"  ;
+  "DATABASE=PUBS;"  ;
+  "WSID=<machine name or userid>;"  ;
+  "APP=MicroX(R) Sample App" 
lnConnHandle=SQLSTRINGCONNECT(m.lcDSNLess)
=SQLEXEC(lnConnHandle, "SELECT * FROM SomeMSSQLTable" , "VFPCursor" )
=SQLDISCONNECT(lnConnHandle)
BROWSE LAST
select VFPCursor
copy to c:\myfile.dbf 


Данные найдете в файле c:\myfile.dbf
...
Рейтинг: 0 / 0
Как взять данные с SQL Server ?
    #32397799
Наталия
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо :)
таблицу получила :)
можно еще помучаю ? у меня теперь есть две свободные таблицы как вставить данные из одной в другую ? как обращаться к таблицам ?
вы уж извините, VFP урезанный ни хелпа ни чего ...
...
Рейтинг: 0 / 0
Как взять данные с SQL Server ?
    #32397834
Crip
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Продолжая код
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
lcDSNLess= "DRIVER = {SQL Server};"  ; 
+  "SERVER=<servername>;"  ;
+  "UID=<userid>;"  ;
+  "PWD=<password>;"  ;
+  "DATABASE=PUBS;"  ;
+  "WSID=<machine name or userid>;"  ;
+  "APP=MicroX(R) Sample App" 
lnConnHandle=SQLSTRINGCONNECT(m.lcDSNLess)
=SQLEXEC(lnConnHandle, "SELECT * FROM SomeMSSQLTable" , "VFPCursor" )
=SQLDISCONNECT(lnConnHandle)
BROWSE LAST
select VFPCursor
copy to c:\myfile.dbf 
Use c:\MyFirstTable.dbf in  0 
select MyFirstTable
append from dbf( "VFPCursor" )
close databases

Может хелп немного почитаете?
...
Рейтинг: 0 / 0
Как взять данные с SQL Server ?
    #32397873
Наталия
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Crip Может хелп немного почитаете?
Я бы с удовольствием :) нету у меня его :( диск который нашла, один всего ... VFP установился, но не хелпа ни визардов :( а я первый раз его вижу ... подскажите где в сети найти можно ?
мне нужно как с таблицами работать средствами SQL, синтаксис INSER, Update , если он в вфп с транзакт сиквела различается. может есть где статьи на русском, буду очень благодарна :)
...
Рейтинг: 0 / 0
Как взять данные с SQL Server ?
    #32398068
bdv9
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Help к VFP
http://www.foxclub.ru/docum.php3
...
Рейтинг: 0 / 0
Как взять данные с SQL Server ?
    #32398123
Наталия
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо :)
а то без хелпа тоскливо :) абсолютно безпомощной себя чувствуешь :/
...
Рейтинг: 0 / 0
12 сообщений из 12, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Как взять данные с SQL Server ?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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