Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

Программирование (VB,C#,ASP,.NET): новости, советы, примеры



Выпуск # 288


http://www.kbyte.ru/

 

Новый выпуск!

Доброе время суток!
Меня зовут R-KDR-19826, представляю Вам очередной выпуск рассылки Kbyte.Ru!

 

Содержание выпуска

Система ЭКСПЕРТ

    Вопрос #000807: Проблемы с закачкой файлов из Интернета на Ginz...

    Вопрос #000804: Проблемы с загрузкой файлов на Ginza MS100

    Вопрос #000799: Новый вопрос без темы

    Вопрос #000791: Проблема_в_VB_.NET_с_использованием_функции_из_...

    Вопрос #000764: Програмное определение позиции меню в vb6

Последнее на форумах

    Загрузка файла с передачей параметров

    Задача на VB

    Дизайнер и музыкант в одном лице!

    Дизайнер и музыкант в одном лице

    Доступ к Microsoft Access

Последние статьи

    Как узнать размер базы данных MySQL через php

    Взаимодействие с другими сайтами через HTTP (HttpWebRequest и HttpWebResponse)

    Работа с SQL – Запросы

    Использование XML.Serialization

    Выбор языка программирования для научных работ (2-я редакция)

Интересные коды и решения

Юмор на Kbyte.Ru

 

Система ЭКСПЕРТ

 

Система «Эксперт» - уникальная система, которая поможет решить, если не все, то многие Ваши проблемы с программированием и разработкой! Если у Вас есть какой-либо вопрос по программированию или разработке, то Вы всегда можете задать его нашим Экспертам! При этом каких-либо особых действий от Вас не потребуется! Просто отправьте Ваш вопрос на адрес mailto:expert@kbyte.ru, в теме письма укажите тему вопроса, в тексте – сам вопрос, и все! Эксперты дадут Вам ответ в течение 12-24 часов, на тот адрес, с которого Вы отправите вопрос. Все проще простого! Никакой регистрации и заполнение бесконечных форм, просто спросите и получите ответ ;-)


Вопрос #000807: Проблемы с закачкой файлов из Интернета на Ginz...

Автор вопроса: Koshpaev Valery // 03.03.2008 / 18:36

Здравствуйте,уважаемые эксперты!Может вся проблема заключается в том,что я не установил на Джинзу ActiveSync 4.5 с установочного диска,который прилагается к коммуникатору?Только я не знаю где,в каком клубе в Москве я могу закачать эту программу на компьютер,а потом перекачать ее с компьютера на свой коммуникатор,т.к.я пытался обращаться в одно интернет-кафе,другое,но нигде мне не разрешали закачивать ActiveSync на компьютер с установочного диска для Джинзы.У моего коммуникатора есть GPRS,но нет EDGE-какую лучше скорость подключения к
Интернету мне подключить,и почему всегда прерывается связь при закачке файлов 3.gp,всегда выдавая мне сообщение об однои и той же ошибке,про которую я Вам уже писал?Валерий ________________________________________________________ Вы уже с Yahoo!? Испытайте обновленную и улучшенную. Yahoo! Почту! http://ru.mail.yahoo.com

Отвечает: Алексей Немиро // 04.03.2008 / 05:48

Здравствуйте, Валерий.

ActiveSync необходим для синхронизации данных с ББ (ББ – большой брат :) – обычный компьютер).
Следует отметить, что если например, у Вас
будут в личных папках размещены какие-либо файлы, а на ББ этих файлов
не будет, то с устройства при синхронизации они будут удалены, так что
важные данные лучше хранить где-нибудь в другом месте, например на
карточке памяти, либо в любой другой папке, не имеющей отношения к
личным папкам (Мои документы, Мои мелодии и т.п.) пользователя
устройства.

Так что в данном случае, установка данного софта на компьютер в клубе
бессмысленна, да и Ваши личные данные могут стать достоянием
общественности (на локальном компьютере в папке «Мои документы»
создается папка с данными из личных папок устройства).

Рекомендую найти какого-нибудь друга в Москве, и воспользоваться для
этих целей его компьютером.

--
С наилучшими пожеланиями,
Немиро Алексей http://aleksey.nemiro.ru/

 

Вопрос #000804: Проблемы с загрузкой файлов на Ginza MS100

Автор вопроса: Koshpaev Valery // 02.03.2008 / 13:30

Здравствуйте,эксперты!У меня есть коммуникатор Ginza MS100(CPU:ARM 926TI OMAP 750@200MHz;128MB ROM+64MB RAM;OC:Microsoft Windows Mobile 5.0),но у меня нет компьютера или ноутбука.Мой коммуникатор Джинза имеет встроенный браузер для выхода в Интернет.Я хочу закачивать небольшие фильмы и видеоролики напрямую из Интернет,а также различные программы-тоже из Интернета.Но всегда при попытках скачивания файлов из Интернет появляются сообщения об ошибках:1)"Данный файл не читается(не отображается)на устройстве"2)"Неизвестная ошибка при скачивании файлов
0X80004005"(что это за код и из-за чего он появляется,что он означает?)3)"Искомую страницу не удается найти из-за неизвестной ошибки 0x80072f78"(что это за код и из-за чего он появляется,что он означает?)4)Какую программу,видеоконвертер мне надо установить на Ginza MS100,чтобы я мог скачивать различные медиафайлы из Интернета своей Джинзой и откуда я могу эту программу скачать(лучше-бесплатно!)?Пожалуйста,вышлите ответы на этот адрес моей почты!-Заранее большое Вам спасибо и очень надеюсь на Вашу помощь!Валерий ________________________________________________________ Вы уже с Yahoo!? Испытайте обновленную и улучшенную. Yahoo! Почту! http://ru.mail.yahoo.com

Отвечает: Алексей Немиро // 04.03.2008 / 05:37

Здравствуйте, Валерий.

Вероятно проблема в том, что Вы пытаетесь открыть файл прямо из
Интернета, а не скачать его. Скорей всего ошибка происходит из-за
отсутствия нужных кодеков, и банальной поддержки данного формата
файлов в системе, а также из-за нестабильной связи.

Вообще, большие файлы лучше не качать по GPRS, это не надежно и
дороговато. Обычно все, что нужно закачивают на устройство через
компьютер.

В качестве плеера могу порекомендовать Core Player, а как альтернативу
IE, можно использовать Opera.
Все это дело можно найти на сайте 4pda.ru.

Что касается файлов других форматов, то обычно, эти файлы в Интернет размещены в
архивах zip или rar, WM такие файлы не понимает,
нужно устанавливать дополнительные программы, чтобы работать с файлами
архивов, например файловый обозреватель Resco Explorer 2007
может читать zip-архивы. Файлы установок обычно идут в формате
cab, они вполне нормально должны запускаться.
Некоторые программы могут быть размещены как обычные
Windows-инсталеры, т.е. чтобы их установить потребуется компьютер и
подключить устройство к нему.

--
С наилучшими пожеланиями,
Немиро Алексей http://aleksey.nemiro.ru/

 

Вопрос #000799: Новый вопрос без темы

Автор вопроса: Максим // 01.03.2008 / 18:57

При попытке открыть дизайнер формы в Visual Studio 2008 возникает ошибка
"The service Microsoft.VisualStudio.Shell.Interop.ISelectionContainer
already exists in service container/ Parameter name: serviceType". Данная
ошибка возникает на всех языках программирования.

Отвечает: EROS // 01.03.2008 / 22:10

 

Вопрос #000791: Проблема_в_VB_.NET_с_использованием_функции_из_...

Автор вопроса: Mikhail Belov // 29.02.2008 / 18:28

Отлаживаю программу в среде разработки Microsoft Visual Basic.NET, возникает проблема:
В ходе исполнения в Отладчике при вызове функции из DLL-библиотеки получаю диагностику
в окне Microsoft Development Environment:

-------------------------------
Необработанное исключение типа "System.NullReferenceException" произошло в Modul.exe.

Дополнительные сведения: в экземпляре объекта не задана ссылка на объект.
-------------------------------

Моdul - имя отлаживаемой программы.

Отладчик "подсвечивает" строку с вызовом функции из библиотеки:
res = ReadIEEE32(8, 0, "rEAd", val, tm, 0)

Переменные объявлены выше в модуле:
Dim res As Long
Dim val As Single

Функция из DLL-библиотеки объявлена в модуле:
Private Declare Function ReadIEEE32 Lib "owen_io" _
(ByVal adr As Long, ByVal adr_type As Long, _
ByVal command As String, ByRef res As Single, _
ByRef time As Long, ByVal Index As Integer) As Long



В Help'e на библиотеку функция описана следующим образом:
для C++
int ReadIEEE32(DWORD adr,DWORD adr_type,char *command,float &value,int &time,int index);

для VB
Function ReadIEEE32(ByVal adr As Long, ByVal adr_type As Long, ByVal command As String, res As Single, time As Long, ByVal Index As Integer) As Long

Подскажите, что делать ?

Отвечает: EROS // 01.03.2008 / 08:27

По всей видимости дело в неправильном объявлении функции. Попробуйте
Long заменить Integer.

 

Вопрос #000764: Програмное определение позиции меню в vb6

Автор вопроса: Иван Денишев // 16.02.2008 / 23:24

Здравствуйте уважаемые эксперты!
Говорят, что вы можете ответить на любой вопрос.
Как программно в vb6 узнать, на каком пункте меню находится курсор.
Для примера, возьмём меню "файл".
Caption | Name
Файл | MnuFile
Создать | MnuFileNew
Открыть | MnuFileOpen
Ну, и пожалуй, хватит. И так будет понятно.
Запускаем программу и жмём: либо f10, либо alt.
Затем стрелку вниз.
Меню "Создать", выделится другим цветом.
Так вот, как программно получить, где находится курсор?
Ведь, в vb нету свойства GotFocus у менюшек.
Очень надеюсь на вашу помощь!
---
С уважением: Иван Денишев.

Отвечает: Алексей Немиро // 17.02.2008 / 10:12

Здравствуйте, Иван.

ВНИМАНИЕ: Данный пример довольно опасный, и может привести к зависанию Visual Basic!

Скачать готовый пример можно тут: http://kbyte.ru/Code/Samples/form1.zip

Создайте новый EXE-проект, на форме разместите Timer и вставьте следующий код:

Код формы:
001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
Option Explicit

Private Sub Form_Load()
 gHW = Me.hwnd
 Hook
End Sub

Private Sub Form_Unload(Cancel As Integer)
 Unhook
End Sub

Private Sub Timer1_Timer()
 Me.Caption = SelectedMenuString
End Sub


Также добавьте несколько элементов меню.
Дополнительно создайте новый модуль и вставьте следующий код:

Код модуля:
001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
016:
017:
018:
019:
020:
021:
022:
023:
024:
025:
026:
027:
028:
029:
030:
031:
032:
033:
034:
035:
036:
037:
038:
039:
040:
041:
042:
043:
044:
045:
046:
047:
048:
049:
050:
051:
052:
053:
054:
055:
056:
057:
058:
059:
060:
061:
062:
063:
064:
065:
066:
067:
068:
069:
070:
071:
072:
073:
074:
075:
076:
077:
078:
079:
080:
081:
082:
083:
084:
085:
086:
087:
088:
089:
090:
091:
092:
093:
094:
095:
096:
097:
098:
099:
100:
101:
102:
103:
104:
105:
106:
107:
108:
109:
110:
111:
112:
113:
114:
115:
116:
117:
118:
119:
120:
121:
122:
123:
124:
125:
126:
127:
128:
129:
130:
131:
132:
133:
134:
135:
136:
137:
138:
139:
140:
141:
142:
143:
144:
145:
146:
Option Explicit

Public SelectedMenuString As String 'здесь будет заголовок выбранного элемента меню

Private Declare Function CallWindowProc Lib "user32" _
  Alias "CallWindowProcA" (ByVal lpPrevWndFunc As Long, _
  ByVal hwnd As Long, ByVal Msg As Long, _
  ByVal wParam As Long, ByVal lParam As Long) As Long

Private Declare Function SetWindowLong Lib "user32" _
  Alias "SetWindowLongA" (ByVal hwnd As Long, _
  ByVal nIndex As Long, ByVal dwNewLong As Long) As Long

Private Declare Function GetMenu Lib "user32" _
 (ByVal hwnd As Long) As Long

Private Declare Function GetSubMenu Lib "user32" _
 (ByVal hMenu As Long, ByVal nPos As Long) As Long

Private Declare Function GetMenuItemCount Lib "user32" _
 (ByVal hMenu As Long) As Long

Private Declare Function GetMenuState Lib "user32" _
 (ByVal hMenu As Long, ByVal wID As Long, _
  ByVal wFlags As Long) As Long

Private Declare Function GetMenuString Lib "user32" _
  Alias "GetMenuStringA" (ByVal hMenu As Long, _
  ByVal wIDItem As Long, ByVal lpString As String, _
  ByVal nMaxCount As Long, ByVal wFlag As Long) As Long

Private Const MF_BYPOSITION = &H400&
Private Const MF_HILITE = &H80&
Private Const WM_MENUSELECT = &H11F
Private Const GWL_WNDPROC = -4

Public lpPrevWndProc As Long
Public gHW As Long

Public Sub Hook()
  'Begin hooking into messages.
  lpPrevWndProc = SetWindowLong(gHW, GWL_WNDPROC, _
  AddressOf WindowProc)
End Sub

Public Sub Unhook()
  'Cease hooking into messages.
  SetWindowLong gHW, GWL_WNDPROC, lpPrevWndProc
End Sub

Function AnyLit(hSubSubMenu As Long) As Long
  Dim i As Long
  Dim MenuCount As Long

  'Get the number of items in the menu.
  MenuCount = GetMenuItemCount(hSubSubMenu)

  'Loop through the menu items.
  For i = 0 To MenuCount - 1
    'Check whether this item is highlighted.
    If GetMenuState(hSubSubMenu, i, MF_BYPOSITION) And _
        MF_HILITE Then
      AnyLit = True
      Exit Function
    End If
  Next i

  'Return FALSE, no items highlighted.
  AnyLit = False
End Function

Private Sub WalkSubMenu(hSubMenu As Long)
  Dim i As Long
  Dim MenuItems As Long
  Dim hSubSubMenu As Long
  Dim buffer As String
  Dim result As Long

  'Get the count of menu items in this menu.
  MenuItems = GetMenuItemCount(hSubMenu)

  'Loop through all the items on the menu.
  For i = 0 To MenuItems - 1
    'Determine whether this item is highlighted.
    If GetMenuState(hSubMenu, i, MF_BYPOSITION) And _
        MF_HILITE Then
      'Attempt to get a submenu for each menu item.
      hSubSubMenu = GetSubMenu(hSubMenu, i)

      'Check for a submenu with something selected on it.
      If hSubSubMenu And AnyLit(hSubSubMenu) Then
        'There is a submenu with a selection so walk it.
        WalkSubMenu hSubSubMenu
      Else
        buffer = Space(255)
        result = GetMenuString(hSubMenu, i, buffer, Len(buffer), MF_BYPOSITION)
        buffer = Left$(buffer, result)
        SelectedMenuString = GetDescription(buffer)
        Exit Sub
      End If
    End If
  Next i
End Sub

Public Sub FindHilite(TheForm As Form)
  Dim hMenu As Long
  Dim hSubMenu As Long
  Dim i As Long
  Dim MenuCount As Long

  'Clear any previous description.
  SelectedMenuString = ""

  'Get the menu handle.
  hMenu = GetMenu(TheForm.hwnd)

  'Check to see if there is no menu.
  If hMenu <> 0 Then
    'Get the number of top-level menus.
    MenuCount = GetMenuItemCount(hMenu)

    'Enumerate through all top-level menus.
    For i = 0 To MenuCount - 1
      'Ignore top-level menus not currently selected.
      If GetMenuState(hMenu, i, MF_BYPOSITION) And _
          MF_HILITE Then
        'Get a handle to the submenu.
        hSubMenu = GetSubMenu(hMenu, i)

        'Walk the submenu.
        WalkSubMenu hSubMenu
      End If
    Next i
  End If
End Sub

Private Function GetDescription(MenuCaption As String) As String
 GetDescription = MenuCaption
End Function

Function WindowProc(ByVal hw As Long, ByVal uMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
 If uMsg = WM_MENUSELECT Then
  FindHilite Form1
 End If
 WindowProc = CallWindowProc(lpPrevWndProc, hw, uMsg, wParam, lParam)
End Function


При выборе элемента меню в переменной SelectedMenuString будет текст заголовка выбранного элемента меню.

 


Чтобы задать Ваш вопрос, отправьте его на адрес expert@kbyte.ru

Раздел Эксперт на сайте Kbyte.Ru

Наверх

 

 

Последнее на форумах

Загрузка файла с передачей параметров | Автор: MrLink
Добавлено: 01.04.2008 / 20:37 | ответов: 0 | просмотров: 14

Здравствуйте!
Подскажите пожалуйста как скачать изображение с сайта, если при его загрузке необходимо передавать дополнительные параметры, инече загружается текст с ошибкой.
Ссылка не прямая, имеет вид:http://site.ru/pic.php?id=111111&razdel=some&t=1234567891

Параметры для передачи следующие (взяты из Fiddler):

Accept: */*
Referer: http://site.ru/some.php?id=123456&d=9
Accept-Language: ru
UA-CPU: x86
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; .NET CLR 1.1.4322; .NET CLR 2.0.50727; .NET CLR 3.0.04506.30; .NET CLR 3.0.04506.648; .NET CLR 3.5.21022)
Proxy-Connection: Keep-Alive
Host: site.ru
Cookie: PHPSESSID=11a11a1a11b11111111111a111f1ebbd; rtn1p=1

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

Через HttpWebRequest/HttpWebResponse передаются параметры, но как ответ сохранить (или загрузить в байтовый массив)(в виде изображения) + картину портит ответ от сервера (Transfer-Encoding: chunked)

Полный ответ от сервера:

HTTP/1.1 200 OK
Date: Tue, 01 Apr 2008 15:38:07 GMT
Server: Apache/2.2.3 (Unix) PHP/4.4.4
X-Powered-By: PHP/4.4.4
Expires: Tue, 01 Apr 2008 18:38:07 GMT
Cache-Control: public, max-age=10800
Last-Modified: Sun, 21 Oct 2007 06:25:19 GMT
Content-Disposition: attachment; filename=site_ru_111111.jpg
Connection: close
Transfer-Encoding: chunked
Content-Type: image/jpeg

Подскажите пожалуйста как ее все-таки можно скачать?

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Задача на VB | Автор: Nadia2008
Добавлено: 28.03.2008 / 21:07 | ответов: 0 | просмотров: 50

Претик всем =) помогите пожалуйста решить задачку, я VB только начала изучать а препод задал такое что аж голова закружилась :))) половину с задачи я не понимаю =)

1. Дан масив двухмерный, состоящий из 10 строк и 4 столбцов, данные
расположены с 1-10 лист.
2. В столбцах С и F необходимо найти сумму неотрицательных елементов
при условии, что масив представляет собой числовые значения
(интенджер), найти разницу между максимальным и минимальным елементом,
все 2 значения вывести в окно сообщений

Главное задачу решить. но есле есть материал то можно еще и инфу по етим вопросам =) хотя и сама найду (наверно)
Вопросы
1. Объекты ВБА для Иксель
2. Назначение коллекций
3. Отличие ВБ от ВБА
4. Виды объявлевления масивов (команда REDIM)
5. Пользовательский тип данных. Пример
6. Отличия процедур от функций
7. Особенности типа данных. Вариант.

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Дизайнер и музыкант в одном лице! | Автор: Dimidrol
Добавлено: 28.03.2008 / 18:57 | ответов: 0 | просмотров: 38

Не самый крутой но умелый и ответственный дизайнер может помочь тебе за твои деньги:)
Дизайн и вёрстка Веб страниц, шапок, логотипов, банеров, всё сравнительно дёшево.
На шапки в данный момент сезон скидок так что обращайтесь :)

Также, сочинение и написания музыки и саунд треков самых разных направлений, в том числе: рок, панк-рок, блюз, клубняк, нью эйдж, словянске мотивы. (Да, и такое может)
Озвучка к играм, фильмам + может сочинить и записать жывую рок балладу если очень надо:)

+ имеется опыт дизайна форумомов на движке IPB (Invision Power Board)

Вобщем в случае чего обращайтесь, а главное не стесняйтесь спрашивать ;)

Контакры
e-mail: zonadimidrola@inbox.ru
icq: 245-587-236

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Дизайнер и музыкант в одном лице | Автор: Dimidrol
Добавлено: 28.03.2008 / 00:39 | ответов: 0 | просмотров: 44

Не самый крутой но умелый и ответственный дизайнер может помочь тебе за твои деньги:)
Дизайн и вёрстка Веб страниц, шапок, логотипов, банеров, всё сравнительно дёшево.
На шапки в данный момент сезон скидок так что обращайтесь :)

Также, сочинение и написания музыки и саунд треков самых разных направлений, в том числе: рок, панк-рок, блюз, клубняк, нью эйдж, словянске мотивы. (Да, и такое может)
Озвучка к играм, фильмам + может сочинить и записать жывую рок балладу если очень надо:)

+ имеется опыт дизайна форумомов на движке IPB (Invision Power Board)

Вобщем в случае чего обращайтесь, а главное не стесняйтесь спрашивать ;)

Контакры
e-mail: zonadimidrola@inbox.ru
icq: 245-587-236

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Доступ к Microsoft Access | Автор: DetRoyD
Добавлено: 25.03.2008 / 12:35 | ответов: 1 | просмотров: 82

Народ помогите, как выполнять SQL запросы в Microsoft Visual Studio 2005 , в Visual Basic 6 было все понятно через DAO и все путем , а в 2005 версии я чет даже немогу законектиться с базой данных ... у кого есть ссылочки или примеры скиньте пожалусто!!! Надо просто из вормы записать данные в базу ... пробывал ... указанные тут:


Function AddTo MyBase()

'Установление соединения
Dim sConnectionString As String
'sConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("~/App_Data/dbBase.mdb")
sConnectionString = String.Format("Provider=Microsoft.Jet.OLEDB.4.0;Data Source={0}", Server.MapPath("~/App_Data/dbBase.mdb"))
Dim Connection As New OleDbConnection(sConnectionString)
Connection.Open()

'Добавление данных
Dim sSQL
sSQL = "INSERT INTO Results(num_group, mark, sys_qual, full_inform, add_inform, navig_qual, disyne_qual, propolsals)" & _
"VALUES (@num_group, @mark, @sys_qual, @full_inform, @add_inform, @navig_qual, @disyne_qual, @propolsals)"
Dim myCmd As New OleDb.OleDbCommand(sSQL)
myCmd.Parameters.Add("@num_group", OleDb.OleDbType.WChar).Value = dplNumGroup.Text 'текст
myCmd.Parameters.Add ("@mark", OleDb.OleDbType.Double).Value = Val(txtISEstimate.Text)
myCmd.Parameters.Add("@sys_qual", OleDb.OleDbType.WChar).Value = RadioButtonList1.Text
myCmd.Parameters.Add("@full_inform", OleDb.OleDbType.WChar).Value = RadioButtonList2.Text
myCmd.Parameters.Add("@add_inform", OleDb.OleDbType.WChar).Value = txtAddInformation.Text
myCmd.Parameters.Add("@navig_qual", OleDb.OleDbType.WChar).Value = RadioButtonList3.Text
myCmd.Parameters.Add("@disyne_qual", OleDb.OleDbType.WChar).Value = RadioButtonList4.Text
myCmd.Parameters.Add("@propolsals", OleDb.OleDbType.WChar).Value = txtPropolsals.Text

'Dim myDB As New DataAccessManager("~/App_Data/dbBase.mdb")
Dim myDB As New DataAccessManager(Server.MapPath("~/App_Data/dbBase.mdb"))
myDB.ExecuteNonQuery(myCmd) 'Выполняем запрос

& nbsp;End Function

пишет что DataAccessMeneger is not defined как я понял не определена ... ! кто что знает помогит плиз напомню Работаю из под Micrisoft Visual Studio 2005

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 1 | Автор: Edlin
Добавлено:27.03.2008 / 08:58
Используй метод ExecuteNonQuery у myCmd. Но перед этим установи для этой команды соединение:

myCmd.Connection = Connection
myCmd.ExecuteNonQuery()

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Наверх

 

Последние статьи

Как узнать размер базы данных MySQL через php
Автор: Николай Рудченко | добавлено: 14.02.2008 / 13:01 | просмотров: 275

В этой небольшой статье вы узнаете, как получить размер вашей базы данных (БД) MySQL используя язык программирования PHP.

Взаимодействие с другими сайтами через HTTP (HttpWebRequest и HttpWebResponse)
Автор: Немиро Алексей | добавлено: 27.07.2007 / 14:01 | просмотров: 3482

В данной статье речь пойдет о том, как можно программно заполнить и отправить Web-форму, а также получить результат с использованием довольно простых классов - HttpWebRequest и HttpWebResponse.

Работа с SQL – Запросы
Автор: Хабибулин А. (aka Bille Gates) | добавлено: 22.07.2007 / 04:43 | просмотров: 6545

В данной статье рассмотрены часто используемые SQL-запросы и приведены примеры их использования.

Использование XML.Serialization
Автор: Немиро Алексей | добавлено: 19.07.2007 / 15:38 | просмотров: 1829

В данном обзоре речь пойдет об использование XML.Serialization в .NET и ее применении на примере сохранения и считывания настроек программы с использованием синтаксиса языка Visual Basic .NET.

Выбор языка программирования для научных работ (2-я редакция)
Автор: Юдин С. Ю. | добавлено: 15.03.2007 / 02:49 | просмотров: 4578

Идея написания этой статьи возникла после того, как на одном из сайтов по физике http://physics.nad.ru/aniboard/messages/291.html я обнаружил интересный алгоритм моделирования движения тела в поле постоянной напряженности по различным направляющим. Вернее, меня заинтересовал не весь алгоритм, т.к. основа их всех одна (принцип Даламбера, если не считать квазиалгоритма с применением уравнений Лагранжа 2-го рода) и различаются они только способом определения реакций в месте соприкосновения тел. ...

 

Статьи на Kbyte.Ru

Наверх

 

Интересные коды и решения

Как ограничить передвижение мыши?
Дата добавления: 16.08.2006 / 19:46 | просмотров: 1138 | платформа: VB

Как программно изменить заголовок (Title) страницы?
Дата добавления: 31.07.2006 / 13:25 | просмотров: 1374 | платформа: ASP .NET (VB)

Получение данных из куков (Cookies)
Дата добавления: 31.07.2006 / 15:55 | просмотров: 1394 | платформа: ASP .NET (VB)

Как проверить корректность E-Mail?
Дата добавления: 17.08.2006 / 18:18 | просмотров: 1754 | платформа: VB

Перекодировка текста из DOS в Windows и обратно
Дата добавления: 31.07.2006 / 12:31 | просмотров: 1573 | платформа: VB

Как сделать, чтобы при «редиректе» сервер выдал 301 код статуса, а не 302?
Дата добавления: 31.07.2006 / 13:50 | просмотров: 1422 | платформа: ASP .NET (VB)

Как удалить все HTML-теги из текста?
Дата добавления: 24.03.2007 / 12:41 | просмотров: 1635 | платформа: VB .NET

Как программно установить/получить значение текстового поля (HtmlInputTextBox)?
Дата добавления: 31.07.2006 / 16:15 | просмотров: 1648 | платформа: ASP .NET (VB)

Как перенаправить посетителя на другую страницу, незаметно для него?
Дата добавления: 31.07.2006 / 14:42 | просмотров: 1532 | платформа: ASP .NET (VB)

Получение многоразрядного числа2
Дата добавления: 31.07.2006 / 12:33 | просмотров: 1110 | платформа: VB

 

Универсальные коды на Kbyte.Ru

Наверх

 

Юмор на Kbyte.Ru

Windows 95! - сказал программист и грязно выругался...

 

Рейтинг: 414
Всего голосов: 556
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Однажды меня вот так достали рекламой (повадились мне на факс спам кидать - бумагу тратят гады, а на нужный факс по закону подлости всегда бумаги не хватит), позвонил в офис от кого пришел факс (три метра бумаги) - вежливо попросил исключить мой номер из их рассылок. Через час от них пришел еще один факс длинной в метр ( видимо уже в воспитательных целях).
Пришлось настроить винфакс и в 24-00 по местному времени послам им в офис текстовой файл весом в 600 кб (инструкцию по проверке трансформаторов на подтанциях и проведения на них регламентных работ). Файл шел до того момента пока у них бумага не кончилась. Утром позвонил
и спросил: "Вы наш факс получили?". Реакция была блеск :))))))

 

Рейтинг: 286
Всего голосов: 430
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Рабочий день. Вычислительный центр. Приемная директора. В приемную вбегает женщина и с ходу направляется в кабинет директора. Ее тормозит секретарша:
- Женщина, вы куда? У директора совещание.
- Да он меня звал, я с АСУ.
- Ну, я тоже сосу, но не во время совещания...

 

Рейтинг: 236
Всего голосов: 357
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

1941 г. Москва. Рабинович вызван в Hаркомат Обороны.
-Товарищ Рабинович! Помогите стране! Hужно распространить за линией фронта 20000 листовок. Будьте осторожны и бдительны!
Через неделю входит Рабинович:
- Все распространил...
- Hеужели все распространили?
- Да. Прошу расписку. Вот деньги.

 

Рейтинг: 165
Всего голосов: 275
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Чем отличается человек умеющий программировать от настоящего программиста: первый разговаривает на русском и программирует на С, а второй разговаривает на С и программирует на русском.

 

Рейтинг: 336
Всего голосов: 491
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

С тех пор, как я попробовала новый "Dove", моя кожа помолодела, стала нежной, приятной на ощупь. Поры раскрылись.
Я почувствовала прилив бодрости, новых сил! Даже сама удивилась! Хотя на вкус - мыло как мыло...

 

Рейтинг: 146
Всего голосов: 246
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

- Вашу фирму интересует изготовление рекламы?
- Нет, спасибо - у нас всё в порядке...

 

Рейтинг: 151
Всего голосов: 259
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Летит компьютеp с 9-го этажа, и дyмает: "Вот бы щас зависнyть..."

 

Рейтинг: 244
Всего голосов: 387
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Сразу хочу пояснить - то, что я кратко хочу рассказать - не боян, или как там еще называют плагиат или какие-нибудь хреновые выдумки, а рассказано мне непосредственым участником событий.
Ну так вот. Кто не знает - в Москве появилась новая площадь - имени Шарля де Голля. А почему она так названа? Правильно. Потому что напротив гостиницы "Космос" поставили памятник этому самому Шарлю де Голлю, и открывали этот памятник не кто-нибудь, а Наш и Их президенты.
А перед самым открытием, примерно за неделю, приехал посмотреть на это чудо сам Лужков. А сопровождал его автор чуда. Правильно. Церетели. Посмотрел Лужков на этот памятник и указал Церетели на то, что козырек кепки длинноват, понимаешь. Ну не может, видишь ли, козырек быть длиннее самой кепки! Не вопрос!!! Далее - действие от очевидца. Примерно в час ночи подъезжает подъемник, еще какие-то машины, накинули на голову памятнику огромный куполообразный чехол - и тихо, по-видимому, газосваркой, обрезали козырек кепки! только потом, наверное, отшлифовали - пошумели чем-то минут 40.
А наутро никто и не заметил перемены в памятнике. Наверно, потому, что смотреть на творения Церетели невозможно, так никто и не смотрит.

 

Рейтинг: 287
Всего голосов: 431
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Я уже не первый год являюсь (о: с божьей помощью :о) нештатным консультантом Ростовской Епархии по компьютерным вопросам. Добрейшей души человек, умница и незаурядный талант, служащая концелярии Л. П. с благоговейным трепетом относится к своему компьютеру и готова на него молиться. Пользоваться им я ее научил, и работает она уверенно, но панический страх перед техникой она преодолеть не может. По любому пустяку она звонит мне и я голосом, полным отчаяния и тревоги, жалуется на "катастрофические проблемы". Мне всегда отвечать приходится со слов: "Милейшая Л. П., давайте успокоимся и разберемся по порядку: что случилось, что Вы предприняли и что нужно сделать". Позвонив сегодня, как обычно Л. П. стала сокрушенно жаловаться. Сегодня замялась бумага в принтере и извлечь ее ей не удается.
- Hе удается? Я Вам уже рассказывал, как нужно поступать в таком случае. Что Вы предпринимали?
- Я подняла крыжку и на большее смелости у меня не хватило.
- Что потом?
- Я позвала отца Александра, но и он бумагу вынуть не смог.
- Сочувствую. Что потом?
- Я воздала молитву Hиколаю Угоднику.
- И это не помогло???!
- Увы, нет, да простит меня господь.
- Что же потом.
- Потом я решила побеспокоить Вас…

 

Рейтинг: 272
Всего голосов: 420
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Весь юмор на Kbyte.Ru

Наверх


Выпуск подготовил: R-KDR-19826

Редактор: Немиро Алексей

Copyright (c) Nemiro AS, 2005-2007


В избранное