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

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



Выпуск # 127


http://www.kbyte.ru/

 

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

Здравствуйте!
Очередной выпуск рассылки Kbyte.Ru!

 

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

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

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

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

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

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

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

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

    Вопрос #000080: Небольшой_вопрос_по_Visual_Basic

    Вопрос #000077: Проверка_выбора_цвета

    Вопрос #000076: Чтение_файла_с_конца_в_Visual_Basic_.NET

    Вопрос #000078: Запуск_любого_файла_в_VB_6.0

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

    Вирус WINFILE.EXE

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

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

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

    Access и php...

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

    Long в диалоге

    ASP.NET Расширение кругозора

    RichTextBox, TextBox в таблицах Acess. (VB Net)

    У кого периодически пропадает авторизация, пишите в этот топик

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

    Выбор языка программирования для научных работ (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 часов, на тот адрес, с которого Вы отправите вопрос. Все проще простого! Никакой регистрации и заполнение бесконечных форм, никаких наездов, оскорблений и насмешек со стороны гуру, просто спросите и получите ответ ;-)


Вопрос #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)

 

Вопрос #000080: Небольшой_вопрос_по_Visual_Basic

Автор вопроса: Анка // 19.04.2007 / 22:42

Доброе утро!

Мне Вас рекомендовали ;-)

Возникла проблема, я загружаю данные из базы данных в форму, проблема
в том, что со временем данных стало очень много, и моя программа как
бы "зависает". Я разместила на форме кнопку "Отмена", чтобы люди могли
отменять загрузку, но поскольку моя программка "висит", то нажать на
нее не возможно :(( Что посоветуете сделать в данном случае?


Огоромное спасибо за ответы! ;-)


Ой, совсем забыла, речь идет о Visual Basic 6.0 :-)

Отвечает: EROS // 19.04.2007 / 22:42

К сожалению, реализовать многопоточную модель на VB 6 крайне трудно. И
поэтому обычно идут на всякого рода ухищрения. Односложного ответат
тут нет, и все зависит от конкретной ситуации. Например при заполнении
ListBox или Tree большим объемом данных эти данные загружают не все
сразу, а частями.. по мере необходимости.. в зависимости от положения
ползунка прокрутки списка или по мере раскрывания "нодов".
Если же данные заполняются в цикле, то в таких случая внутрь цикла вставляют
оператор DoEvents. Это избавит от эффекта "подвисания" формы.
Возможно алгоритм заполнения данными не совсем корректный и его стоит
доработать. В любом случае решение зависит от ситуации...
--
С уважением,
EROS

Отвечает: Алексей Немиро // 20.04.2007 / 06:56

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

Для этого можно использовать функцию DoEvents
http://kbyte.ru/Refbooks/Show.aspx?id=51

0001:
0002:
0003:
0004:
0005:
0006:
0007:
Private Sub Command1_Click()
  Dim i As Long
  For i = 0 To 10000000
    Label1.Caption = i
    DoEvents
  Next i
End Su


Здесь следует отметить, что если количество данных очень большое, то
DoEvents может значительно замедлить процесс загрузки данных, по
этому, рекомендую поставить счетчик, как в ниже следующем примере:

Private Sub Command1_Click()
Dim i As Long
For i = 0 To 10000000
If i Mod 1000 = 0 Then
Label1.Caption = i
DoEvents
End If
Next i
End Sub


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

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

Наилучшим выходом в данной ситуации является использование комбинации таймера и заполнение во время загрузки БД некоторой области цветом - как это делается во время инсталяции программ.
Если еще добавить процент загрузки и надпись типа
"Подождите, пожалуйста!
Идет релаксация баз данных..."
то будет смотреться не только красиво, но и солидно.
Использование циклов, рекомендованное выше, не желательно, так как на разных процессорах скорость их выполнения разная и поэтому эта технология уже давно не применяется.

--
С уважением:
Анатолий

 

Вопрос #000077: Проверка_выбора_цвета

Автор вопроса: Александр // 19.04.2007 / 22:14

Подскажите, эксперты, как узнать, выбрал юзверь цвет в ColorDialog или
нет?

Я программирую в Visual Basic .NET 2005

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

Отвечает: EROS // 19.04.2007 / 22:14

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, _
ByVal e As System.EventArgs) _
Handles MyBase.Load

Const HEADER As String = "kbyte.ru sample"

Dim dlgColor As New ColorDialog
If dlgColor.ShowDialog = DialogResult.OK Then
MessageBox.Show("Пользователь выбрал:" & dlgColor.Color.ToString, _
HEADER, _
MessageBoxButtons.OK, _
MessageBoxIcon.Information)

Else
MessageBox.Show("Пользователь ничего не выбрал!", _
HEADER, _
MessageBoxButtons.OK, _
MessageBoxIcon.Information)
End If
End Sub

End Class

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

 

Вопрос #000076: Чтение_файла_с_конца_в_Visual_Basic_.NET

Автор вопроса: Николай // 19.04.2007 / 22:07

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

Мне нужно прочитать прочитать определенное количество байт с конца
файла, без загрузки всего файла, так как файл может быть большим. Как
это сделать?

Visual Basic NET 2.0


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

Отвечает: EROS // 19.04.2007 / 22:07

0001:
0002:
0003:
0004:
0005:
0006:
0007:
0008:
0009:
0010:
0011:
0012:
0013:
0014:
0015:
0016:
0017:
0018:
0019:
0020:
0021:
0022:
0023:
0024:
0025:
0026:
0027:
0028:
0029:
0030:
0031:
0032:
0033:
0034:
0035:
0036:
0037:
0038:
0039:
Imports System.IO
Imports System.Text

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, _
                           ByVal e As System.EventArgs) _
                           Handles MyBase.Load

        Dim _filePath As String = "C:\testFile.bin" '// Путь к файлу с данными
        '// тестовый массив байт
        Dim buffer() As Byte = Encoding.Default.GetBytes("Вася Пупкин")
        '//записываем в файл
        File.WriteAllBytes(_filePath, buffer)

        '// Получаем последние 6 байт
        Dim _lastBytes = ReadLastBytes(_filePath, 6)
        '// result test
        MessageBox.Show(Encoding.Default.GetString(_lastBytes))
    End Sub

    Public Shared Function ReadLastBytes(ByVal filePath As String, _
                                         ByVal countBytes As Int32) As Byte()

        Dim _result(countBytes - 1) As Byte '// Буфер для возврата

        Using fs As FileStream = File.OpenRead(filePath)
            Dim _bytes(fs.Length - 1) As Byte
            Dim _offset As Int32 = fs.Length - countBytes
            fs.Position = _offset
            fs.Read(_bytes, _offset, countBytes)
            Array.Copy(_bytes, _offset, _result, 0, countBytes)
        End Using

        '// возвращаем результат
        Return _result
    End Function

End Class

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

 

Вопрос #000078: Запуск_любого_файла_в_VB_6.0

Автор вопроса: Avan // 19.04.2007 / 15:39

Уважаемые Эксперты!

Подскажите, как в Visual Basic 6.0 открыть любой файл приложением, которое за это
отвечает?

Например txt - блокнотом, doc - Word, html - Internet Explorer (или
другим браузером по умолчанию)

А то на форумах надомной издеваются :((

thx!

Отвечает: gvozd // 19.04.2007 / 15:39

Здравствуйте!
Воспользуйтесь API-функцией ShellExecute:

Private Declare Function ShellExecute Lib "shell32.dll" Alias
"ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal
lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String,
ByVal nShowCmd As Long) As Long

Использовать так (пример открывает текстовый файл):
ShellExecute Me.hwnd, vbNullString, "C:\1.txt", vbNullString, "C:\",
SW_SHOWNORMAL

 


Чтобы задать Ваш вопрос, отправьте его на адрес 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

Наверх

 

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

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

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

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


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

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

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

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

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


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

Доброе время

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

Полагаю надо исользовать класс 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 | просмотров: 25

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

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

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


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

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

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


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

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


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

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

Спасибо.

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


Long в диалоге | Автор: pasha
Добавлено: 16.04.2007 / 14:26 | ответов: 1 | просмотров: 23

Мне нужно чтобы в диалоговом окне была переменная Long:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButOK.Click
Dim TextBox1 As String
Dim guess As Double

TextBox1 = "Регистрационный код"


'
guess = CShort(InputBox(TextBox1))


If guess = 6567576 Then
Dim frm As New Windows
frm.Visible = True


End If

If guess <> 6567576 Then

Dim frm As New regeror
frm.Visible = True

End If


End Sub

Где Windows - главное окно моей программы
Где guess-Диалоговое окно с запросом регистрационного кода
VB NET.

Спасибо

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


ASP.NET Расширение кругозора | Автор: Bille Gates
Добавлено: 15.04.2007 / 18:11 | ответов: 2 | просмотров: 43

Hello Всем!
Вот, решил немного пополнить форум, и задать вопросы, которые мучали давно, но руки не доходили их задать! :)
1-ToolBox-это панелька слева, на ней компоненты разные, на ней есть группа Validation, там 6 компонентов которые я ни разу не использовал, если не трудно, объясните зачем они нужны, и приведите примеры использования этих компонентов.
2-Группа WebParts, её тоже не использовал, т.ч. вопрос тот-же что и в 1 случае! Что зачем и как использовать? + если не трудно примеры!
3-Незнакомые файлы... Т.е. в окне Add New Item Есть разные виды файлов, с некоторыми я не знаком, ниже я их перечисль, а вы постарайтесь помочь мне и написать их предназначение:
-WebService.asmx - что такое вэб сервисы я знаю, если можно дайте ссылку на пример их использования(пример с кодом), хотя, я ещё яндекс не насиловал этим, т.ч. если не знаете ссылку, не ищите, сам найду!
-Global.asax - не знаю что и зачем нужон, объясните! Плиз!
-Handler.ashx - не знаю что и зачем нужон, объясните! Плиз!
-XSLTFile.xslне - знаю что и зачем нужон, объясните! Плиз!
-BrowserFile.browser - по названию понятно что для задания настроек браузера, а что за настройки? мне ни разу не приходилось настраивать браузер! Хелп!
-ClassDiagram.cd - Понятно что диаграмма, а что и зачем не понятно! Хлеп!
Вместо ответа на все эти вопросы можете статью написать, т.к. объем ответов оч большой, если будете описывать каждый элемент!
Понимаю что это трудно(ответить на все вопросы), по этому дайте ссылку хотябы на то где можно об этом немного узнать, кроме MSDN :) я там уже был, то хочется нормальным языком всё узнать!

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


RichTextBox, TextBox в таблицах Acess. (VB Net) | Автор: pasha
Добавлено: 15.04.2007 / 12:49 | ответов: 1 | просмотров: 35

1. Как засунуть содержимое TextBoxов и RichTextBoxoв, каждьй в свою строку (запись) в таблице БД Acess?
2. Как в GridViewe переименовать названия столбцов в таблицах БД Acess? P.S. Новые названия должны быть на русском языке.


Спасибо.

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


У кого периодически пропадает авторизация, пишите в этот топик | Автор: Алексей
Добавлено: 15.04.2007 / 04:12 | ответов: 0 | просмотров: 25

Если у кого-то есть проблемы с авторизацией, пишите в этот топик.

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


Наверх

 

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

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

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

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

Не так давно мне пришлось немного поработать 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 | просмотров: 2482

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

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

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

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

Как известно, большинство сайтов имеют однотипную, общепринятую разметку страниц, неотъемлемой частью которой является верхний и нижний колонтитулы и, пожалуй, самая главная часть - тело страницы, хотя конечно, бывают и исключения. 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 | просмотров: 3195

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

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

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

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

Файл 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 | просмотров: 35024

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

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

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

 

Статьи на Kbyte.Ru

Наверх

 

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

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

Как узнать IP-адрес текущего посетителя?
Дата добавления: 31.07.2006 / 15:34 | просмотров: 792 | платформа: ASP .NET (VB)

Поиск и замена
Дата добавления: 16.08.2006 / 18:54 | просмотров: 426 | платформа: VB

Запуск программы
Дата добавления: 21.08.2006 / 20:19 | просмотров: 609 | платформа: VB

Как получить имя пользователя?
Дата добавления: 24.03.2007 / 12:20 | просмотров: 53 | платформа: VB .NET

Как динамически добавить элемент управления?
Дата добавления: 17.08.2006 / 17:02 | просмотров: 409 | платформа: ASP .NET (VB)

Поиск слов определенной длины
Дата добавления: 24.03.2007 / 11:02 | просмотров: 55 | платформа: RegEx

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

Проверка существования файла с использованием API
Дата добавления: 31.07.2006 / 12:41 | просмотров: 471 | платформа: VB

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

 

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

Наверх

 

Юмор на Kbyte.Ru

Дети, знаете ли вы, откуда течет электричество? - спрашивает учительница.
- Я знаю! - вскакивает ученик.
- Из джунглей!
- Почему ты так считаешь?
- А сегодня утром папа, когда хотел бриться, сказал: "Опять эти обезьяны отключили электричество!"

 

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

 

Учительница на уроке:
Дети расскажите историю чтоб она заканчивалась словами "Мама у меня одна"
Маша:
Мы летом с мамой ездили в сочи. Там красивая природа. Мне очень понравилось. Спасибо тебе мама, мама у меня одна.
Петя:
Мы с мамой на выходных ходили в горы. Собирали цветочки. Наелись шашлыка. Спасибо тебе мама, мама у меня одна.
Вовочка:
Пришёл я вчера со школы домой. Хочется жирать, денег на обед мне не дают. Открываю холодильник стоит пара бутылок пива. Одну я выпил. просыпается мать с будуна:
-Вальдемар приниси мне две бутылки пива
-мама у меня одна

 

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

 

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

 

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

 

Она била себя в грудь и рвала на груди волосы.

 

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

 

Открыт новый поисковый сервер для новых русских: www.tipa.au

 

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

 

Урок русского языка. Учительница спрашивает детей привести пример на окончание -тся. Отвечает Маша: "Мама стирается."
Учитель: "Садись. Пять."
Отвечает Петя:" Файл копируется."
Учитель:"Садись. Пять. Ну а Вовочка твой пример?"
Вовочка:"Корова залезла на дерево."
Учитель:"Ну и что?"
Вовочка:"Сейчас на@бн%тся!"

 

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

 

Играет симфонический оркестр. Дирижер делает последний взмах, все замолкают, только мужик на контрабасе - бум, бум, бум, бум:
Через минуту тоже закончил, лоб вытирает:
- Фу-у-х! Еле догнал!

 

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

 

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

 

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

 

- Доктор, я наверное смертельно больна?
- ???
- Видете ли, по всем каналам ТВ и от всех фирм-производителей рекламируют прокладки от жидкости синего цвета, а она у меня красная!

 

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

 

Я пришел к тебе с дискетой - рассказать, что сеть упала.

 

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

 

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

Наверх


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

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

Copyright (c) Nemiro AS, 2005-2007


В избранное