Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Есть вопрос... Добавлено: 09.01.04 18:28  

Автор вопроса:  KAM | ICQ: 190197618 

Подскажите как программно расшарить папку или диск?

Ответить

  Ответы Всего ответов: 4  

Номер ответа: 1
Автор ответа:
 Sharp


Лидер форума

ICQ: 216865379 

Вопросов: 106
Ответов: 9979
 Web-сайт: sharpc.livejournal.com
 Профиль | | #1
Добавлено: 09.01.04 19:06

Поиск по форуму

Ответить

Номер ответа: 2
Автор ответа:
 KAM



ICQ: 190197618 

Вопросов: 25
Ответов: 97
 Профиль | | #2 Добавлено: 10.01.04 12:33

:( Чё-то не ищеца...

Ответить

Номер ответа: 3
Автор ответа:
 Sharp


Лидер форума

ICQ: 216865379 

Вопросов: 106
Ответов: 9979
 Web-сайт: sharpc.livejournal.com
 Профиль | | #3
Добавлено: 10.01.04 17:41
Гм, действительно, пни админов
Вот код из API Guide:

'Code by Roy Strickland, submitted by Jarret Peterson

'This code can share and unshare the directory 'c:\dos'

'===================================

'start a new project and add three command buttons

'set forms AutoRedraw property to true

'ADD TO A MODULE IN YOUR PROJECT:

'====================================

Option Explicit

Public Platform As Long 'Platform ID of OS. 1 or 2

'Structure for Getversion

Public Type OSVERSIONINFO

dwOSVersionInfoSize As Long

dwMajorVersion As Long

dwMinorVersion As Long

dwBuildNumber As Long

dwPlatformId As Long

szCSDVersion As String * 128 ' Maintenance string for PSS usage

End Type

Public Const STYPE_DISKTREE As Long = 0

Public Const STYPE_PRINTQ As Long = 1

Public Const STYPE_DEVICE As Long = 2

Public Const STYPE_IPC As Long = 3

'Access types

Public Const ACCESS_READ As Long = &H1

Public Const ACCESS_WRITE As Long = &H2

Public Const ACCESS_CREATE As Long = &H4

Public Const ACCESS_EXEC As Long = &H8

Public Const ACCESS_DELETE As Long = &H10

Public Const ACCESS_ATRIB As Long = &H20

Public Const ACCESS_PERM As Long = &H40

Public Const ACCESS_ALL As Long = &H7F

Public Const WNTYPE_DRIVE As Long = 1

Public Const SHI_USES_UNLIMITED As Long = -1

<

Ответить

Номер ответа: 4
Автор ответа:
 Sharp


Лидер форума

ICQ: 216865379 

Вопросов: 106
Ответов: 9979
 Web-сайт: sharpc.livejournal.com
 Профиль | | #4
Добавлено: 10.01.04 18:06

Гм... Не вместилось... Короче, качай API Guide с www.allapi.com - стопудово пригодится.

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам