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

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



Выпуск # 128


http://www.kbyte.ru/

 

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

Если у Вас возникнут какие-либо вопросы, замечания, пожелания или предложения, пишите, мы детально рассмотрим каждое Ваше сообщение – mailto: admin@kbyte.ru.

 

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

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

    Вопрос #000110: Фильтрация_главной_таблицы_по_полям_подчиненной

    Вопрос #000107: Как_получить_уникальные_данные_из_таблицы?

    Вопрос #000101: Книжка_по_TSQL

    Вопрос #000103: Параметры_запуска_программы

    Вопрос #000098: Ох_уж_это_кеширование_:((

    Вопрос #000094: Фнукци_http_redirect

    Вопрос #000093: Авторизация_(программно)_(ASP_.NET_(VB_.NET))

    Вопрос #000091: работа с большими изображениями в VB6

    Вопрос #000088: Как_получит_название_месяца_и_год_на_PHP?

    Вопрос #000084: Команда_AndAlso

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

    Запись в файл

    ADO/DAO DB

    Ксто подскажет, что ни так в коде...

    Сколько времени в "хз"

    Вирус WINFILE.EXE

    Проблемы, проблемы, проблемы

    Масштабирование изображения

    Сохранение изменений в БД Acess (GridView)

    Access и php...

    Сохранение в *.rtf

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

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

    Работаем с MIME

    Visual Basic 2003/2005 .NET: Взаимодействие с Microsoft Word 2000 и выше

    Visual Basic .NET: Работа с файлами

    ASP .NET 2.0: Эталонные страницы

    Описание ошибок VB

    Горячие клавиши VB 6.0

    ASP .NET 2.0: Файл Global.asax

    Как узнать страну по IP-адресу?

    Visual Basic 6.0 - Экспорт DataReport в Microsoft Word

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

Юмор на Kbyte.Ru

 

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

 

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


Вопрос #000110: Фильтрация_главной_таблицы_по_полям_подчиненной

Автор вопроса: eyakovlev@zos-v.ru // 25.04.2007 / 11:20

Есть таблица заказов и подчиненная таблица товаров по заказам. Нужно наложить фильтр на таблицу заказов по наличию в заказе конкретного товара. Как это сделать через Dataset (т.е. DataTable)?

Пишу на VB.net БД MS SQL Server.

Но можно и пример др. языке .Net, разберусь.

С уважением, Яковлев Евгений

Отвечает: Алексей Немиро // 25.04.2007 / 11:20

Здравствуйте,

Делается это примерно так:
0001:
0002:
Dim myTable = New DataTable("TestTable")
myTable.DefaultView.RowStateFilter = "tovar = 1"


либо использовать DataView:

Dim myView As New DataView(myTable)
myView.RowStateFilter = "tovar = 1"



--
С наилучшими пожеланиями,
Немиро Алексей

 

Вопрос #000107: Как_получить_уникальные_данные_из_таблицы?

Автор вопроса: Александр Резванов // 25.04.2007 / 08:40

Здравствуйте, Эксперты!

У меня проблема с построением запроса SQL Server 2005.
У меня есть три таблицы:

Countries
Cities
Address

И мне надо получить из них данные, например из таблицы Address
получить список городов. Другими словами нужно получить список
городов, в которых есть адреса. Но у меня не получается, у меня один и
тотже город по 10 раз встречается :( Количество дубликатов зависит от
количества адресов в городе. Можно как-нибудь такое исправить? А то
делать несколько запросов и циклом их обрабатывать как-то неправильно
будет, и на производительности отразится...

В заранее, спасибо.

Отвечает: EROS // 25.04.2007 / 08:40

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

 

Вопрос #000101: Книжка_по_TSQL

Автор вопроса: Алексей // 24.04.2007 / 17:53

Здравствуйте ЭКСПЕРТЫ!

Порекомендуйте книженцию по TSQL, оч.нада. Спасибо.

Отвечает: Анатолий Присяжнюк // 24.04.2007 / 17:53

Посмотрите:
http://www.realcoding.net/article/view/2384
а еще лучше, если если есть возможность купите "Профессиональное руководство по Transact-SQL. Для профессионалов"

Отвечает: EROS // 25.04.2007 / 00:12

На установочном диске с MS SQL Server 2005 есть справочная система BOL
(SQL Server 2005 Books Online). На мой вгляд - это лучшее, что вообще
может быть по T-SQL. К тому же, насколько мне известно, в инете есть и русский
вариант этой справочной системы.
--
С уважением,
EROS

 

Вопрос #000103: Параметры_запуска_программы

Автор вопроса: Dj. Santa // 24.04.2007 / 15:36

Уважаемые эксперты! Подскажите, как в Visual Basic 6.0 сделать
программу, которую можно было бы запускать с определенными
параметрами. Как например, блокнот, когда открываешь какой-нибудь
файл, запускается блокнот, а потом открывается указанный файл... или
что-то вроде этого.

Отвечает: gvozd // 24.04.2007 / 15:36

Здравствуйте!
Параметры передаются через Command, например, вставьте в процедуру Form_Load
следующий код:
MsgBox Command
После компиляции запустите приложение с параметром и вы увидите сообщение с
этим параметром.

 

Вопрос #000098: Ох_уж_это_кеширование_:((

Автор вопроса: Павел // 23.04.2007 / 11:02

Замучело кеширование страниц на PHP!! Помогите его выключить!

Взараня, пасиба

Отвечает: Алексей Немиро // 23.04.2007 / 11:02

Здравствуйте,

0001:
0002:
0003:
0004:
Header("Expire: Mon, 1 Jan 1990 01:01:01 GMT");
Header("Cache-Control: no-cache, must-revalidate");
Header("Pragma: no-cache");
Header("Last-Modified: ".gmdate("D, d M Y H:i:s")." GMT");


--
С наилучшими пожеланиями,
Немиро Алексей

 

Вопрос #000094: Фнукци_http_redirect

Автор вопроса: Павел // 22.04.2007 / 14:50

Поскажите, как сделать редирект. Не могу понять как пользоваться
функцией http_redirect :((

Взараня, пасиба

Отвечает: EROS // 22.04.2007 / 14:50

Описание функции:
http://php.docs.zumu.org/function.http-redirect.html

Редирект


--
С уважением,
EROS

Отвечает: Алексей Немиро // 23.04.2007 / 03:59

Здравствуйте,

Редирект можно еще заголовком сделать:

0001:
header("Location: Путь_Редиеркта");



--
С наилучшими пожеланиями,
Немиро Алексей

 

Вопрос #000093: Авторизация_(программно)_(ASP_.NET_(VB_.NET))

Автор вопроса: Сергей // 22.04.2007 / 14:21

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

Подскажите, как программно авотризировать пользователя с
использованием Membership в ASP .NET (Visual Basic .NET)?

Т.е., как например компонент Login делает, но сделать это вручную.
Я хочу разместить на форме свое поле для ввода пароля и логина, и
кнопку, и чтобы по нажатию, происходила авторизация, если пользователь
указал правильные данные..

Отвечает: EROS // 22.04.2007 / 14:21

1. Компонент Login является настраиваем, и вы можете изменить его
дизайн КАК вам угодно.
2. Если же вы все же хотите проводить авторизацию юзеров ручками, то
это делается примерно так:
0001:
0002:
0003:
0004:
        Dim authTicket As New FormsAuthenticationTicket(UserName, True, Int32.MaxValue)
        Dim Id As New FormsIdentity(authTicket)
        Dim principal As New GenericPrincipal(Id, Roles.GetRolesForUser(UserName))
        Context.User = principal

Где UserName-логин Вашего юзера
--
С уважением,
EROS

 

Вопрос #000091: работа с большими изображениями в VB6

Автор вопроса: меня // 22.04.2007 / 04:52

Здравствуйте, уважаемый expert.
Подскажите, как в VB v6.0 получить цвет пикселя, определенного
координатами, из файла формата
*.bmp?
Дело в том, что если использовать PictureBox, и если изображение не
будет влазить на форму, то цвет пикселей за пределами формы,
возвращаемых .Point (или GetPixel), будет
равен минус одному.


--
С уважением
mailto:zet74_88@mail.ru

Отвечает: Алексей Немиро // 22.04.2007 / 04:52

Здравствуйте,

Видимо придется увеличит PictureBox до размеров картинки -
AutoSize = True. А также установить свойство AutoRedraw = True

0001:
0002:
0003:
0004:
0005:
0006:
0007:
0008:
0009:
0010:
0011:
0012:
0013:
0014:
0015:
0016:
Private Sub Form_Load()
  Me.ScaleMode = vbPixels
  Me.Controls.Add "VB.PictureBox", "myPic"
  With Form1!myPic!
    .Left = 0
    .Top = 0
    .Width = 10
    .Height = 10
    .AutoSize = True
    .AutoRedraw = True
    .Visible = True
    .ScaleMode = vbPixels
    .Picture = LoadPicture(Environ("SystemRoot") & "\Пузыри.bmp")
    MsgBox (.Point(100, 100))
  End With
End Su


--
С наилучшими пожеланиями,
Немиро Алексей

 

Вопрос #000088: Как_получит_название_месяца_и_год_на_PHP?

Автор вопроса: Павел // 21.04.2007 / 16:01

Как на PHP получить название текущего месяца, причем полностью и
русское, а также текущий год. Типа: Апрель 2007, Май 2007 и т.д?

Взараня, пасиба

Отвечает: gvozd // 21.04.2007 / 16:01

Здравствуйте!
Используйте функцию date:
date('F Y');
Но месяц возвращается на английском.

Отвечает: Алексей Немиро // 21.04.2007 / 16:19

Здравствуйте,

Для реализации этого можно использовать массив русских названий
месяцев (или месяцов, кому как больше нравится :) ..) и функцию date()

0001:
0002:
0003:
0004:
0005:
var $months = new array(1=>"Январь", 2=>"Февраль", 3=>"Март",
                        4=>"Апрель", 5=>"Май", 6=>"Июнь", 7=>"Июль",
                        8=>"Август", 9=>"Сентябрь", 10=>"Откябрь",
                        11=>"Ноябрь", 12=>"Декабрь");
return $months[date("m")];


что-то типа этого.


--
С наилучшими пожеланиями,
Немиро Алексей

 

Вопрос #000084: Команда_AndAlso

Автор вопроса: Ivan // 20.04.2007 / 09:55

Здравствуйте, подскажите, для чего служит команда AndAlso в Visual Basic .NET?

Отвечает: EROS // 20.04.2007 / 09:55

Объясню на примере..

Допустим, мы имеем такие строчки кода:

0001:
0002:
0003:
  If (Not x Is Nothing) And (x.y = 10) Then
    ...
End If


Так вот, в том случае если x= Nothing вы получите исключение типа NullPointerException. Поскольку в этом случае проверются ОБА условия.. Если заменить And на AndAlso, то никакого исключения не будет потому что в этом случае ;проверка условий происходит несколько иначе. Если первое условие является ложным, то второе условие уже проверяться не будет! И соответственно код внутри этого блока тоже не будет выполнен. Таким образом мы имеем следующее.. В случае с And проверяются ОБА условия в любом случае, а в случае с AndAlso второе условие проверяется только в том случае, если первое - истинно(True)

 


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

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

Наверх

 

 

Голосование на Kbyte.Ru

Голосование на Kbyte.Ru через E-Mail!
Чтобы проголосовать через E-Mail, выберите ответ, если у Вас настроен почтовый клиент, должно появиться окно с новым сообщением, ничего не изменяйте, а просто отправьте пустое письмо и в течение некоторого времени Ваш голос будет зачтен.
Для голосования через сайт, перейдите по этой ссылке: http://kbyte.ru/Voting/.
Будете ли Вы участвовать в конкурсах, проводимых на сайте?
На сайте периодически проводятся конкурсы с призами. Будете ли Вы принимать в них участие?
Да, с удовольствием! (15)
Возможно, буду (2)
Нет, меня это не интересует (2)
Нет, я не уверен (а), что смогу выиграть (1)
Нет, это слишком сложно для меня (0)
Нет, я считаю, что это обман и призов не будет (7)
Нет, призы этого не стоят (2)

Всего голосов: 29

Голосование на Kbyte.Ru

Наверх

 

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

Запись в файл | Автор: -АлександР-
Добавлено: 25.04.2007 / 21:20 | ответов: 0 | просмотров: 1

Первый раз пишу в файлы в дотнете:

делаю это так:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim r As New System.IO.FileStream("C:\Documents and Settings\Александр\Рабочий стол\n.txt", IO.FileMode.Create)
Dim n As Byte() = New System.Text.UTF32Encoding(True, False).GetBytes(TextBox1.Text.ToCharArray)
Me.Text = n.Length.ToString
r.Write(n, 0, n.Length)
r.Close()
r.Dispose()
End Sub
но меня смущает то, что файл записывается так: каждый символ имеет размер 4байта!!!

Почему?

Хотелось бы знать, как правильно записывать файлы, после вб6 появилось очень много нового, например UTF32Encoding, массив байтов

Заранее спасибо!

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


ADO/DAO DB | Автор: pasha
Добавлено: 25.04.2007 / 14:49 | ответов: 2 | просмотров: 4

Что нужно сделать, чтобы в GridViewe сохранялись изменения?
Кстати, а в "Мастере форм данных" VB NET, даже если я ставлю эксклюзивные права Acess, база не обновляется и изменения не сохраняются?

Да, я проверил архив http://pave-borisov.narod.ru/bookmark.rar на вирусы (про него я писал в отдельном топике про проблемы). По сканеру Avast! вирусов нет, и я его на сайте обновил. Помогите как-нибудь!

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


Ксто подскажет, что ни так в коде... | Автор: Kolya007
Добавлено: 25.04.2007 / 09:42 | ответов: 1 | просмотров: 8

Ошибки:
Warning: (null)(): Invoke() failed: Ошибка. Source: Microsoft OLE DB Provider for ODBC Drivers Description: [Microsoft][Драйвер ODBC Microsoft Access] Дисковая или сетевая ошибка. in z:\home\shamanking.ru\www\login.php on line 13

Warning: odbc_exec(): supplied argument is not a valid ODBC-Link resource in z:\home\shamanking.ru\www\login.php on line 15

Код:
12 $conn = new COM('ADODB.Connection');
13 $conn -> Open("DRIVER={Driver do Microsoft Access (*.mdb)}; DBQ='sk.mdb'");
14 $sql = "Select * From Table Where per1_t = $per And per2_t = $per2";
15 $result = odbc_exec ($conn, $sql);
16 if ($result) {
17 $msg = "1";
18 } else {
19 $msg = "0";
20 };
Выводит Ошибки и 0. Переменные $per1 и $per2 типа String получены из формы методом POST. Остальная часть кода функционирует.

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


Сколько времени в "хз" | Автор: Алексей
Добавлено: 25.04.2007 / 07:30 | ответов: 2 | просмотров: 9

сабж.


---
Это сообщение добавлено через Forum Mail Conference (FMC)

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


Вирус WINFILE.EXE | Автор: pasha
Добавлено: 23.04.2007 / 14:26 | ответов: 1 | просмотров: 10

В пред. топике я писал про свои проблемы. Но я вирусов не делаю! У меня в С:\ стоит WINFILE.EXE, наверное от моей же программы. Я же написал ее для учёта книг, а там какой-то вирус. Сканера вирусов у меня нет, что с этим делать, не знаю.
Я ВИРУСЫ НЕ ДЕЛАЮ! ПООМОГИТЕ, ЧТО С ЭТИМ ДЕЛАТЬ???!!!

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


Проблемы, проблемы, проблемы | Автор: pasha
Добавлено: 22.04.2007 / 16:16 | ответов: 1 | просмотров: 18

У меня опять все те же проблемы. Диалог rtf не хочет сохранять файл, И С БД проблемы. С сохранением изменений.

Весь проект тут: http://pave-borisov.narod.ru/bookmark.rar

Откройте и увидите все мои проблемы. Помогите как-нибудь.

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


Масштабирование изображения | Автор: -АлександР-
Добавлено: 21.04.2007 / 20:46 | ответов: 8 | просмотров: 20

Доброе время

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

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

Private Sub PictureBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseMove
PictureBox1.Select()
p = e.Location
End Sub

Private Sub PictureBox1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles PictureBox1.Paint

g = e.Graphics
Dim m As New System.Drawing.Drawing2D.Matrix(MScale, 0, 0, MScale, p.X, p.Y)
g.Transform = m

g.DrawLine(Pens.Blue, 0, 0, -20, -20)
g.DrawLine(Pens.Blue, 0, 0, 20, 20)
g.DrawRectangle(Pens.Blue, 10, 10, 10, 20)

End Sub
в приведнном выше коде получается, что картинка не просто масштабируется относително заданой точки, а эта точка становится началом координат (как этого избежать?)

Заранее спасибо!

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


Сохранение изменений в БД Acess (GridView) | Автор: pasha
Добавлено: 17.04.2007 / 15:03 | ответов: 0 | просмотров: 30

Как в GridViewe сохранить изменения в таблице Acess (если я ввёл данные непосредственно в GridView, ведь он не сохраняет изменения просто так, при вводе данных? Код подскажите для VB NET. Спасибо.

Чего только не бывает, но жить приходится

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


Access и php... | Автор: Kolya007
Добавлено: 16.04.2007 / 18:52 | ответов: 9 | просмотров: 32

Скажите, как мне на php из БД Access взять таблицу, для её обработки? У меня получается взять всю БД, хотя мне нужна только одна таблица...

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


Сохранение в *.rtf | Автор: pasha
Добавлено: 16.04.2007 / 17:41 | ответов: 5 | просмотров: 40

Дайте, пожалуйста, код диалога для сохранения нескольких labeloв и текстовых полей в один файл формата *rtf.


Форма в проекте VB NET тут: http://pave-borisov.narod.ru/Biblio1.rar

P.S. Форма, всё для той же программы "библиотека"
Тех, кто поможет упомяну в Авторском праве :).

Спасибо.

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


Наверх

 

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

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

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

Работаем с MIME
Автор: Немиро Алексей | добавлено: 29.11.2006 / 14:46 | просмотров: 1289

Не так давно мне пришлось немного поработать MIME (Multipurpose Internet Mail Extension) - это стандарт почтовых сообщений, в РуНете (Russian Internet) я не нашел нормального описания спецификации MIME, и посему решил написать небольшую статейку на эту тему. В данной статье вы узнаете об основных особенностях и стандартах MIME, а также научитесь «читать» MIME с использованием синтаксиса языка Visual Basic .NET 2005.

Visual Basic 2003/2005 .NET: Взаимодействие с Microsoft Word 2000 и выше
Автор: Хабибулин А. (aka Bille Gates) | добавлено: 05.10.2006 / 12:15 | просмотров: 2494

Эта статья будет полезна только тем людям, у которых установлен Microsoft Word 2000 или выше! Мы научимся делать всё возможное с документами MS WORD при помощи VB 2003/2005 .NET.

Visual Basic .NET: Работа с файлами
Автор: Хабибулин А. (aka Bille Gates) | добавлено: 04.10.2006 / 10:35 | просмотров: 2968

В этой статье мы поговорим о работе с файлами. Научимся добавлять и удалять файлы/каталоги, записывать и читать данные из файла и.т.д.

ASP .NET 2.0: Эталонные страницы
Автор: Немиро Алексей | добавлено: 27.08.2006 / 04:08 | просмотров: 2256

Как известно, большинство сайтов имеют однотипную, общепринятую разметку страниц, неотъемлемой частью которой является верхний и нижний колонтитулы и, пожалуй, самая главная часть - тело страницы, хотя конечно, бывают и исключения. ASP .NET 2.x предлагает уникальный метод создания одинаковой разметки для страниц сайта – это использование, так называемых, эталонных страниц. Если вы работали с ранними версиями ASP(ASP, ASP .NET 1.x), то, наверное, помните, что постоянно приходилось копировать HTML-код страницы с элементами ASP. Конечно, использование включаемых файлов (include) в классическом ASP, и пользовательских элементов управления (*.ascx) в ASP .NET 1.x, значительно упрощало разработку Web-сайтов, но это не сравнится с тем, что предлагает ASP .NET 2.x.

Описание ошибок VB
Автор: [root] | добавлено: 29.07.2006 / 06:58 | просмотров: 3224

В данном обзоре содержится русскоязычное описание ошибок Visual Basic 5.0/6.0.

Горячие клавиши VB 6.0
Автор: [root] | добавлено: 20.07.2006 / 13:21 | просмотров: 1757

В данном обзоре рассмотрены горячие клавиши Visual Basic 5.0/6.0, которые значительно ускоряют процесс разработки и тестирования программ.

ASP .NET 2.0: Файл Global.asax
Автор: Немиро Алексей | добавлено: 17.07.2006 / 18:04 | просмотров: 2061

Файл Global.asax является необязательным файлом приложений ASP .NET и содержит дополнительный код, отвечающий за обработку событий, происходящих на уровне приложения. Этот файл должен находиться в корневом каталоге Web-приложения. В ASP .NET 1.1 сей файл автоматически создавался Visual Studio при создании нового Web-проекта, в ASP .NET 2.0 Visual Studio Global.asax автоматически не создает, но его можно добавить в проект вручную. Все изменения, внесенные в файл Global.asax отслеживаются средой ASP .NET, и приложение перезагружается...

Как узнать страну по IP-адресу?
Автор: Amit Gupta | добавлено: 17.07.2006 / 08:09 | просмотров: 35037

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

Visual Basic 6.0 - Экспорт DataReport в Microsoft Word
Автор: John D. Conway | добавлено: 17.07.2006 / 06:16 | просмотров: 2935

В этой статье мы создадим пример базы данных Microsoft Access и пользовательский интерфейс в среде Visual Basic 6.0. Сделать это будет относительно несложно, поскольку для работы с нашей базой данных мы будем использовать компонент ADODC Componenet (Microsoft ADO Data Control 6.0 (OLEDB)). Мы добавим DataEnvironment и DataReport и буквально, в течении минуты, мы уже сможем экспортировать наш DataReport в Microsoft Word Document. (.doc)...

 

Статьи на Kbyte.Ru

Наверх

 

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

Как создать новую папку (каталог)?
Дата добавления: 31.07.2006 / 12:36 | просмотров: 911 | платформа: VB

Рисование на PictureBox и/или Form?
Дата добавления: 24.03.2007 / 09:58 | просмотров: 43 | платформа: VB .NET

Как связать расширение файла с приложением?
Дата добавления: 04.08.2006 / 08:56 | просмотров: 494 | платформа: VB .NET

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

Поиск окна по заголовку
Дата добавления: 31.07.2006 / 12:52 | просмотров: 449 | платформа: VB

Форма поверх всех окон
Дата добавления: 31.07.2006 / 12:14 | просмотров: 455 | платформа: VB

DataGridView: Как добавить новую колонку?
Дата добавления: 02.08.2006 / 09:53 | просмотров: 740 | платформа: VB .NET

Как обработать не существующий адрес?
Дата добавления: 31.07.2006 / 14:45 | просмотров: 375 | платформа: ASP .NET (VB)

Как получить текущий физический путь?
Дата добавления: 31.07.2006 / 17:05 | просмотров: 362 | платформа: ASP .NET (VB)

Как ограничить количество вводимых символов в TextBox?
Дата добавления: 31.07.2006 / 13:59 | просмотров: 648 | платформа: ASP .NET (VB)

 

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

Наверх

 

Юмор на Kbyte.Ru

Приходит мужик в кабак:
- Я вчера тут весь вечер провёл?
- Тут.
- А зарплату всю пропил?
- Всю.
- Фу-у-у... Слава богу, а я думал, что потерял.

 

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

 

Америка, конец 1999 года, сотрудники компании Microsoft сидят в самолете. Полетели куда-то...
Стюардесса:
- ...и в качестве приятной новости хочу сообщить вам, что бортовые компьютеры нашего лайнера управляются операционной системой Windows-2000! Командир и экипаж желают вам приятного полета!
Через секунду - в дверях пробки - все лезут через головы, чтобы побыстрее выбраться!
А один - самый умный - сидит. Стюардесса:
- А вы почему не торопитесь?
- А он у вас и не взлетит!

 

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

 

Все люди делятся на две категории: Первые не знают кто такой Билл Гейтс, а вторые его не любят.

 

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

 

Пьяный на вокзале обнимает столб. Женский голос из громкоговорителя объявляет:
- Поезд на Мурманск отправляется в 17 часов 15 минут...
- А ну, дура, повтори ещё раз!
- Повторяю...

 

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

 

Новый Русский (НР) припарковывается у обочины, ставит джип на охрану и идет вдоль тротуара, покручивая на пальце ключики и насвистывая себе под нос. Картина: рядом с джипом паркуется горбатый "Запорожец". Из машины вылезает мужик, ставит на педали капканы, на руль подводит электропровода, обматывает машину по периметру конкретной цепью, ставит амбарный замок. НР:
- Ты че мужик? Думаешь, такое дерьмо угонят?!
- Это твою машину угонят, а в мою ср@ть ходят!!

 

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

 

- Почему женщины не моргают во время прелюдии?
- Не успевают.

 

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

 

Прыгают десантники. Все выпрыгнули. Выпускающий:
- Иванов, ты же первый выпрыгнул?
- Да, товарищ капитан, парашют не раскрылся - пришлось вернуться!

 

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

 

Пpогpаммеpы квасят на пpиpоде. Идут pазговоpы, тpали-вали... Один рассказывает:
- Познакомился тут с девушкой на дискотеке! Бесподобная деваха! И фигуpка, и мозги есть, и танцует хоpошо!
Так вот, pешил pickup'нуть ее к себе домой. Пpигласил, она согласилась. Пpишли, выпили винца, поговоpили о том, о сем, музыку послушали. Потом я ее поцеловал, пpиподнял аккуpатно, посадил задницей на клавиатуpу, поднял юбку...
Остальные:
- Так у тебя компутеp дома стоит?!?! А какой???

 

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

 

Oбpaщeниe фиpмы Microsoft к пoльзoвaтeлям:
- В связи с внезапно возникшими нeзнaчитeльными тexничecкими проблeмами, рeлиз oпepaциoнной cиcтeмы 'Windows 2000' oтклaдывaeтcя на пepвый квapтaл 1901 годa.

 

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

 

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

 

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

 

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

Наверх


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

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

Copyright (c) Nemiro AS, 2005-2007


В избранное