powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / добавление файла в MS SQL
7 сообщений из 7, страница 1 из 1
добавление файла в MS SQL
    #32749157
Gmoorick
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Нужно мне выбранный файлик добавить на сервер. Помогите плз.
...
Рейтинг: 0 / 0
добавление файла в MS SQL
    #32749263
SergeyPl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно так (см. описание в HELP):

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
c1 = sqlconnect(...)

sqlexec("CREATE TABLE ...")

sqlexec("INSERT INTO ...")

sqldisconnect(c1)

Придется почитать HELP FoxPro и HELP T_SQL.
...
Рейтинг: 0 / 0
добавление файла в MS SQL
    #32749457
Gmoorick
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
хе хе
так и я умею :)

то что пытался сделать я:

Код: plaintext
1.
2.
3.
4.
5.
opop = getfile()

nconn = sqlconnect ( ... )
sqlexec( nconn,"insert into images ( myImage ) values ( ?opop )

ну вот это и не работает. В МСДН ни одного примера не нашел
...
Рейтинг: 0 / 0
добавление файла в MS SQL
    #32749563
SergeyPl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Тогда Вам сюда - и искать "добавить файл" или "BLOB"
http://www.sql.ru/forum/actualthread.aspx?tid=35798&hl=%e4%ee%e1%e0%e2%e8%f2%fc+%f4%e0%e9%eb+blob%5D%7C>]http://www.sql.ru/forum/actualthread.aspx?tid=35798&hl=%e4%ee%e1%e0%e2%e8%f2%fc+%f4%e0%e9%eb+blob]|> http://www.sql.ru/forum/actualthread.aspx?tid=35798&hl=%e4%ee%e1%e0%e2%e8%f2%fc+%f4%e0%e9%eb+blob" TARGET="_blank">SQLServer
...
Рейтинг: 0 / 0
добавление файла в MS SQL
    #32750702
Gmoorick
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
SergeyPlТогда Вам сюда - и искать "добавить файл" или "BLOB"
http://" TARGET="_blank">http://www.sql.ru/forum/actualthread.aspx?tid=35798&hl=%e4%ee%e1%e0%e2%e8%f2%fc+%f4%e0%e9%eb+blob]http://www.sql.ru/forum/actualthread.aspx?tid=35798&hl=%e4%ee%e1%e0%e2%e8%f2%fc+%f4%e0%e9%eb+blob" TARGET="_blank">SQLServer

Ты сам то искать пробовал ? Единмтвенное что я нашел, так это ветку 2003 года, где сказано "файлик, полученный хитрым методом". Строка запроса: "файл insert sqlexec". + еще похожая ветка, где человек не дождался ответа

/topic/107033&hl=blob

Поетому, если можно, дайте мне код тут , не отправки в поиск.
...
Рейтинг: 0 / 0
добавление файла в MS SQL
    #32753057
SergeyPl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вот, нашел, то что нужно:
How To Use Visual FoxPro and ADO Stream Object to Retrieve Binary Data
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
CLEAR
CLEAR ALL
RELEASE ALL
#DEFINE LOC_SQLSERVERNAME	"MYSERVER"
#DEFINE LOC_SQLUID		"SA"
#DEFINE LOC_SQL_PWD	""

LOCAL lcConnStr, lcSQL, loConnection, lcImageName, ;
	loRecordSet, loADOStream

lcConnStr="Provider=SQLOLEDB;" +;
	"Data Source=" + LOC_SQLSERVERNAME + ";" +;
	"Initial Catalog=PUBS;" +;
	"UID=" + LOC_SQLUID + ";" +;
	"Pwd=" + LOC_SQL_PWD

lcSQL = "SELECT * FROM pub_info"

*!* Creates the objects.
loConnection = CREATEOBJECT("ADODB.Connection")
loRecordSet = CREATEOBJECT("ADODB.Recordset")
loADOStream = CREATEOBJECT("ADODB.Stream")

*!* Open the connections.
loConnection.OPEN(lcConnStr)
loRecordSet.OPEN(lcSQL,loConnection, 2 , 3 )

*!* Set Stream Object properties.
loADOStream.TYPE =  1 	&&  1 =Binary Data,  2 =Text Data.
loADOStream.OPEN

loADOStream.WRITE(loRecordSet.FIELDS("logo")) 	&& Pass data to the stream object.
lcImageName = "BLOB.gif"                  		&& Sets the local file name.
loADOStream.SaveToFile(lcImageName, 2 )         	&& Saves stream object to a file.
@ 1 , 1  SAY CURDIR() + lcImageName BITMAP    		&& Displays image file

*!* Close connections.
loRecordSet.CLOSE
loConnection.CLOSE
loADOStream.CLOSE

ERASE CURDIR() + "BLOB.gif"
...
Рейтинг: 0 / 0
добавление файла в MS SQL
    #32755140
zarazabj
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
я кстати так и делаю, только там одна поправка
не SAVETOFILE, а LOADFROMFILE
this.hd_str.LoadFromFile(lcImageName)
this.hd_rds.FIELDS("doc_docum").value=this.hd_str.Read
this.hd_rds.FIELDS("doc_exp").value= JUSTEXT(lcImageName)
this.hd_rds.UPDATE
...
Рейтинг: 0 / 0
7 сообщений из 7, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / добавление файла в MS SQL
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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