Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Вопрос пользователю oleg_km / 6 сообщений из 6, страница 1 из 1
09.12.2004, 17:22
    #32821588
Iscander
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос пользователю oleg_km
2) для всех винд одного решения не будет, потому как API разное в WinNT и Win9X, причем, если в WinNT (2000, XP) все работает, документировано и пр., то в Win9X сплошные пляски с бубном: одна функция работает, другая не работает, режим Управления доступом нужно учитывать. Если под Win2000 Server (любые станции) нужно решение - пиши намылю
то же касательно Net Send, полностью это работает в WinNT

Вы когда-то отвечали на этот вопрос.
У меня такой вопрос:
База лежит на серваке. С ней работают пользовали. Сервак- Windows TSE.
На серваке есть такая приблуда как Server managter. В ней видно кто открыл файлы на серваке. Можно ли такое организовать в VFP и с помощью каких функций и если можно небольшой пример
...
Рейтинг: 0 / 0
09.12.2004, 18:17
    #32821730
oleg_km
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос пользователю oleg_km
Код: 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.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.
67.
68.
69.
70.
71.
72.
73.
74.
75.
76.
77.
78.
79.
80.
81.
82.
83.
84.
85.
86.
87.
88.
89.
90.
91.
92.
93.
94.
95.
96.
extern "C" __declspec( dllexport ) 
	 int NetFileOpen(const char* cServer, char* cStr)
{
// Ñåðâåð
	LPWSTR cServerName = NULL;
	if (cServer) {
		cServerName = new wchar_t [ 100 ];
		MultiByteToWideChar(
			CP_ACP,
			MB_PRECOMPOSED,
			cServer,
			- 1 ,
			cServerName,
			 100 
		);
	}

// Çàïðîñ
	LPBYTE bufptr;
	NetApiBufferAllocate( 400000 , (LPVOID*) &bufptr);

	DWORD entriesread,
		totalentries;

	NET_API_STATUS nRes = NetFileEnum(
		(char*) cServerName,
	    NULL,
		NULL,
		 3 ,
		&bufptr,
		 400000 ,
		&entriesread,
		&totalentries,
		NULL);

	if (nRes) {
		NetApiBufferFree(bufptr);
		return - 1 ;
	}

// Îòâåò
	LPFILE_INFO_3 bb;
    char* cUser = new char[ 51 ];
    char* cMode = new char[ 3 ];
    char* cPath = new char[ 255 ];

	for (DWORD i =  0 ; i < entriesread; i++) {
	    bb = (LPFILE_INFO_3) (bufptr+sizeof(FILE_INFO_3)*i);
		ZeroMemory(cUser,  51 );
		ZeroMemory(cMode,  3 );
		ZeroMemory(cPath,  255 );

		switch (bb->fi3_permissions) {
			case  1 :
				sprintf(cMode, "R ");
				break;
			case  34 :
				sprintf(cMode, "W ");
				break;
			case  35 :
				sprintf(cMode, "RW");
				break;
		}

		int nLock = bb->fi3_num_locks;

		WideCharToMultiByte(
			CP_ACP,
			 0 ,
			(USHORT*) bb->fi3_username,
			wcslen((USHORT*) bb->fi3_username),
			(char*) cUser,
			 50 ,
			NULL,
			NULL
		);
 
		WideCharToMultiByte(
			CP_ACP,
			 0 ,
			(USHORT*) bb->fi3_pathname,
			wcslen((USHORT*) bb->fi3_pathname),
			(char*) cPath,
			 250 ,
			NULL,
			NULL
		);

		char* cRec = new char[ 310 ];
		sprintf(cRec,"%s\t%2i\t%s\t%s\r\n", 
			cUser, nLock, cMode, cPath);

		strcat(cStr, cRec);
	}
	NetApiBufferFree(bufptr);
	return strlen(cStr);
}

У меня есть такая библиотека на VC++. На www.foxclub.ru вроде был пример на VFP
...
Рейтинг: 0 / 0
09.12.2004, 18:28
    #32821764
Iscander
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос пользователю oleg_km
Спасибо
...
Рейтинг: 0 / 0
17.12.2004, 02:39
    #32831382
Igor Korolyov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос пользователю oleg_km
Hi oleg_km!

> extern "C" __declspec( dllexport )

В принципе всё это достаточно просто переводится на фокс (через DECLARE
DLL), хотя можно и в fll-ку засунуть, и уж её из фокса пользовать...

Posted via ActualForum NNTP Server 1.1
...
Рейтинг: 0 / 0
17.12.2004, 09:00
    #32831506
oleg_km
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос пользователю oleg_km
Да, я где-то видел пример piva, но мне уже не хочется переводить или искать его. Меня устраивает и dll на VC++
...
Рейтинг: 0 / 0
17.12.2004, 11:55
    #32831964
piva
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос пользователю oleg_km
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Вопрос пользователю oleg_km / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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