Отправлено: 22.10.13 17:37. Заголовок: net use

Чем подключить сетевой диск типа NET USE R: \сет.комп\C:
средствами харб ?

 Отправлено: 22.10.13 17:47. Заголовок: NetRedir видимо..

NetRedir видимо

 Отправлено: 22.10.13 17:56. Заголовок: отбой :) FAR меня ве..

отбой :) FAR меня вел в заблуждение. Пока разбирался с другими проблемами, убрал в PATH c:\windows\system32. Far все равно net use отрабатывает, а вот из программы уже не находит.

 Отправлено: 22.10.13 18:03. Заголовок: Far вероятно считыва..

Far вероятно считывает переменные systemroot , winroot , systemdrive и тд и тп , поэтому работает

Если поюзать поиск то http://clipper.borda.ru/?1-4-0-00000869-000-10001-0-1378622321
Но к net нужно дорожку прописать

 Отправлено: 22.10.13 18:11. Заголовок: т.е.будет NetRedir(..

т.е.будет
NetRedir( "R:", "\\комп\диск" ) -> .t. ? Двоеточие нужно или нет ?

А запросить, что диск уже занят другим подключением ? Т.е. NetRedir его не переподключит и даст error ?
Запрос занятости NetDisk( "R:" ) ?
А запрос чем именно- NetRmtname( "R:" ) -> имя ?

 Отправлено: 22.10.13 18:17. Заголовок: and3081 пишет: Двое..

and3081 пишет:

цитата:

Двоеточие нужно или нет ?

Поиграйся. Вроде не нужно оно.
Я эти функции не использую , поэтому читай help , целый раздел для этого есть.

 Отправлено: 22.10.13 18:20. Заголовок: подскажите пожалуйст..

подскажите пожалуйста, какой help вы имеете в виду ? В guide 3.2.0 как раз нет.

 Отправлено: 22.10.13 18:23. Заголовок: тогда смотрим xHarbo..

тогда смотрим xHarbour Language Reference Guide
или пытаемся что то найти в примерах или сырцах включая хиленькую доку
вырезка из ctnet.c (Harbour)

 
 /* 
  * CT3 NET Functions Comments: 
  * 
  * NETCANCEL( <cLocalDevice> ) -> lReleased 
  * Return true if <cLocalDevice> was disconnected. 
  * 
  * NETDISK( cDrive ) -> lSuccess 
  * Return true if <cDrive> is a network drive, otherwise return false if is a local drive. 
  * 
  * NETLOCNAME( cSahredDevice ) -> cLocalDevice 
  * Not implemented yet. 
  * 
  * NETPRINTER() -> lSuccess 
  * Return true if a current local printer seted by SET PRINTER TO was connected to a 
  * network printer. 
  * 
  * NETREDIR( cLocalDevice, cSharedDevice, [ cPassword ], [ lShowError] ) -> lSuccess 
  * Return true if <cLocalDevice> was connected to <cSharedDevice> with <cPassword>, if any. 
  * 
  * NETRMTNAME( cLocalDevice ) -> cSharedName 
  * Return the shared resource name connected to a <cLocalDevice>. 
  * The original parameter <nDevice> in CA-Cl*pper Tools was changed to <cLocalName> in 
  * xHarbour because in Windows Network I didn't find a number table like in MS-DOS. See 
  * CA-T*ols help for more details. 
  * 
  * NETWORK() -> lSuccess 
  * Return true if a PC-LAN/MS-NET or Netware type is active. 
  * 
  * NNETWORK() -> lSuccess 
  * Return true if a Netware type is active. 
  * 
  */ 
  
 

 Отправлено: 22.10.13 18:27. Заголовок: А, как раз это я наш..

А, как раз это я нашел, думал еще что-то пропустил.

 Отправлено: 22.10.13 19:38. Заголовок: and3081 пишет: Чем..

and3081 пишет:

цитата:

Чем подключить сетевой диск типа NET USE R: \сет.комп\C:

А собственно для чего и каких целей ? UNC дорожка чем не устраивает ?

 Отправлено: 22.10.13 23:58. Заголовок: так я организую дост..

так я организую доступ к общим dbf с сетевых компьютеров
про UNC ничего не знаю, только с клиппер перешел, к тому же старого 5,01
UNC path дает какие-то преимущества ?
Учитывая, что клиенты не имеют администраторов и вообще никого :)

 Отправлено: 23.10.13 10:05. Заголовок: and3081 пишет: Чем ..

and3081 пишет:

цитата:

Чем подключить сетевой диск типа NET USE R: \сет.комп\C: средствами харб ?

А зачем подключать сетевой диск ?
Можно же напрямую открывать базы:
M->cPathServer := "\\ВашСервер\ВашРесурс\ПапкаПрограммы\"
USE (M->cPathServer+"ВашаБаза.dbf")

 Отправлено: 23.10.13 11:01. Заголовок: Andrey пишет: А зач..

Andrey пишет:

цитата:

А зачем подключать сетевой диск ? Можно же напрямую открывать базы: M->cPathServer := "\\ВашСервер\ВашРесурс\ПапкаПрограммы\" USE (M->cPathServer+"ВашаБаза.dbf")

Где-то на этом форуме проходила инфа, что с точки зрения производительности лучше подключить диск, чем использовать UNC пути. Связано это с тем, что (возможно?) Windows проверяет (каждый раз?) доступность такого сетевого ресурса. А в случае подключенного диска - делает это реже, либо вовсе не делает.

Чтобы не гадать, можно сделать простейший тест, который будет пару тысяч раз открывать таблицу, читать/писать в нее и закрывать. Потом подсунуть два сетевых ресурса и посмотреть на время исполнения.

 Отправлено: 23.10.13 12:12. Заголовок: Sergy пишет: можно ..

Sergy пишет:

цитата:

можно сделать простейший тест, который будет пару тысяч раз открывать таблицу, читать/писать в нее и закрывать

Это что за прога такая, которая за день "пару тысяч раз" открывает таблицу ?
Сетевые проги так не делают. Один раз открыл утром программу, вечером вышел из неё.
Я не видел такие программы, которые за день запускают "пару тысяч раз"...

 Отправлено: 23.10.13 12:24. Заголовок: Andrey пишет: Это ч..

Andrey пишет:

цитата:

Это что за прога такая, которая за день "пару тысяч раз" открывает таблицу ? Сетевые проги так не делают. Один раз открыл утром программу, вечером вышел из неё. Я не видел такие программы, которые за день запускают "пару тысяч раз"...

Это все нужно лишь для того, чтобы выяснить, в каком случае программа будет работать быстрее:
1) SET DEFAULT TO ("\\server\path\workdir")
или
2) RUN("net use n: \\server\path")
SET DEFAULT TO ("n:\workdir")

 Отправлено: 23.10.13 17:39. Заголовок: вопрос удобства надо..

вопрос удобства
надо открыть под сотню БД и индексов
есть служебные БД, которые нет смысла держать постоянно открытыми- откр/закр в конкретных операциях
в программе есть сервисные режимы, когда все БД закрываются (архивирование, проверки и т.п.), т.е.потом они снова открываются
вопрос не только БД- например файлы обновления тоже берутся там же

диск открыл один раз и забыл. и закрывать его при выходе не зачем. Через полчаса бух снова захочет в программу.

 Отправлено: 23.10.13 18:29. Заголовок: Я так открываю, как..

Я так открываю, как Андрей пишет.

цитата:

M->cPathServer := "\\ВашСервер\ВашРесурс\ПапкаПрограммы\" USE (M->cPathServer+"ВашаБаза.dbf")

После обработки документа база закрывается.
Так как программа выросла из клиппера, то базы (таблицы) открываются при необходимости и закрываются, когда не используются.
Никаких неудобств при этом не возникает.