VBNet - Форум - Проблема с программой :(

Вопрос: Проблема с программой :( Добавлено: 28.02.05 16:44

Автор вопроса: ISpy | Web-сайт: intermult.boom.ru

Вот хотел программку накодить в PBCC, да не хочет работать :(
При нажатие "Run > Compile and Execute" прога вроде скомпилировалась, но при запуске exe'шника выскочил msgbox с таким содержанием:
Заголовок: Project1.exe - Точка входа не найдена
Текст: Точка входа в процедуру WSASTARTUP не найдена в библиотеке DLL WS2_32.DLL.

Что за ошибка, кто знает? Вот код проги:

Type WSA_Data Dword Fill
    wVersion As Integer
    wHighVersion As Integer
    szDescription As String * 257
    szSystemStatus As String * 129
    iMaxSockets As Integer
    iMaxUdpDg As Integer
    lpVendorInfo As Long
End Type

Declare Function WSAStartup Lib "ws2_32.dll" (ByVal wVR As Long, lpWSAD As WSA_Data) As Long

Function PBMain () As Long
Dim wsaData As WSA_Data
    If (WSAStartup(1, wsaData)) Then
     Print "Ошибка инициализации!"
     WaitKey$
     Exit Function
    End If

    Print "Инициализация прошла успешно!"
    WaitKey$
End Function

Да, еще, если у кого есть статьи, примерчики, просто куски кода :) или какая-нибудь другая инфа по PB, просьба скинуть мне на mail, если не сложно и не лень.
Заранее спасибо.

p.s. мое мыло: vova.spy[собака]mail.ru
Ответить

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

Номер ответа: 1 Автор ответа: *CyRax* Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229	Web-сайт: basicproduction.nm.ru Профиль \| \| #1	Добавлено: 28.02.05 17:12
	Ты лучше PB-шными декларациями пользуйся. Сразу большинство проблем отпадёт. TYPE WSADATA wVersion AS WORD wHighVersion AS WORD szDescription AS ASCIIZ * %WSADESCRIPTION_LEN + 1 xFiller1 AS STRING * 3 szSystemStatus AS ASCIIZ * %WSASYS_STATUS_LEN + 1 xFiller2 AS STRING * 3 iMaxSockets AS WORD iMaxUdpDg AS WORD lpVendorInfo AS ASCIIZ PTR END TYPE DECLARE FUNCTION WSAStartup LIB "ws2_32.dll" ALIAS "WSAStartup" (BYVAL wVR AS WORD, lpWSAD AS WSADATA) AS LONG У PB wVR передаётся как WORD, а у тебя Long. Ну и тип тоже подгони. Ответить

Номер ответа: 2 Автор ответа: ISpy Разработчик Offline Client Вопросов: 47 Ответов: 621	Web-сайт: intermult.boom.ru Профиль \| \| #2	Добавлено: 28.02.05 18:39
	Спасибо CyRax! Проблема оказалась в том, что я не написал ALIAS "WSAStartup" ) За совет тоже спасибо. p.s. а откуда ты взял этот код, он немного отличен от моего (xFiller1 AS STRING * 3, xFiller2 AS STRING * 3 - что это кстати?), может у тебя примерчик есть по этой теме, или статья? Ответить

Номер ответа: 3 Автор ответа: *CyRax* Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229	Web-сайт: basicproduction.nm.ru Профиль \| \| #3	Добавлено: 28.02.05 18:52
	Прошу прощения. откуда ты взял этот код Не, ну за что я люблю VB-шников, так это за их непосредственность Зайди в папку \PBWin70\WinAPI (либо \PBCC304\WinAPI). Ответить

Номер ответа: 4 Автор ответа: freeloader ICQ: 50804884 Вопросов: 72 Ответов: 642	Web-сайт: freeloader.folder-pro.net Профиль \| \| #4	Добавлено: 01.03.05 10:26
	Вообще по этому поводу советую скачать самый последний ApiViewer (allapi.net), там уже и PB'шные декларации, типы, константы и все такое. Вообщем класс Ответить

Номер ответа: 5 Автор ответа: ISpy Разработчик Offline Client Вопросов: 47 Ответов: 621	Web-сайт: intermult.boom.ru Профиль \| \| #5	Добавлено: 01.03.05 17:57
	>Зайди в папку \PBWin70\WinAPI (либо \PBCC304\WinAPI) Понятно.. А примерчиков интересных никаких не подкинешь по PB? Ответить

Номер ответа: 6 Автор ответа: *CyRax* Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229	Web-сайт: basicproduction.nm.ru Профиль \| \| #6	Добавлено: 01.03.05 18:14
	Примерчиков немеряно. Зайди сюда http://tolkenxp.com/pb/ или сюда http://www.reonis.com/POFFS/ Скачай Офлайновую версию форума и базы. И считай что что у тебя есть MSDN по PB. Кстати, в Local Assembler, для подсветки синтаксиса я использовал переделанный контрол (EDM32) автора этого офлайнового форума. Ответить

Номер ответа: 7 Автор ответа: ISpy Разработчик Offline Client Вопросов: 47 Ответов: 621	Web-сайт: intermult.boom.ru Профиль \| \| #7	Добавлено: 01.03.05 18:26
	Спасибо. Ответить

Номер ответа: 8 Автор ответа: alex Вопросов: 84 Ответов: 453	Профиль \| \| #8	Добавлено: 01.03.05 21:56
	POFFS - действительно стоящая вещь, почти на 90% вопросов по PB, там можно найти ответы. Единственный недостаток, из-за большого объема трудно скачать все базы. У меня в распакованном виде он занимает 113 мегабайт. И вообще его просто интересно читать, хорошие идеи попадаются. Например, я сейчас пишу защиту для своей Shareware проги, алгоритм нашел там.. Ответить

Страница: 1 |