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

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



Выпуск # 151


http://www.kbyte.ru/

 

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

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

 

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

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

    Вопрос #000306: Выделение фрагмента текста. C#

    Вопрос #000300: Как_декодировать_Url_в_JavaScript?_(спецсимволы...

    Вопрос #000291: Помогите с Excel

    Вопрос #000286: Как_узнать_объем_данных_в_SQL_Server_2005?

    Вопрос #000283: Округление до заданных значений

    Вопрос #000281: progress bar

    Вопрос #000276: Проблема с датой в Access :(

    Вопрос #000274: Куки

    Вопрос #000271: Помогите разобраться с фреймами

    Вопрос #000266: Помощь

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

    Вопрос по БД

    Как ограничить вывод содержимого...

    Помогите с переводом...

    Как сохранить/восстановить Информацию, находящуюся в ListBox?

    Помогите!!!

    Выборка из БД

    Помогите советом )))

    RichTextBox

    RichTextBox

    Идиотские законы США :))

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

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


Вопрос #000306: Выделение фрагмента текста. C#

Автор вопроса: "Greg" // 20.06.2007 / 17:39

После проверки regex-ом на наличие совпадений [if
(System.Text.RegularExpressions.Regex.IsMatch(s, ss))]
Нужно выделить в textbox-е фрагмент совпадения, а так как текст
многострочный требуется так же и передвинуть ползунок к этому фрагменту.
Дайте, пожалуйста, не наставление, а код.

Отвечает: EROS // 20.06.2007 / 21:28

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

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:
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
using System.Text.RegularExpressions;

namespace KByte.Ru
{
  public partial class frmTest : Form
  {
    /// <summary>
    /// VS 2005 (C#)
    /// Find & Select substring (Regular Expression)
    /// </summary>
    /// <remarks>EROS, eros@fromru.com</remarks>
    public frmTest()
    {
      InitializeComponent();
      textBox1.Multiline = true;
      // Load test text
      textBox1.Text = Properties.Resources.Html;
    }

    private void frmTest_Load(object sender, EventArgs e)
    {
      // Search Html color code (Example #C0FFE1 etc ...)
      Regex regEx = new Regex(@"\#[a-fA-F\d]{6}");
      if (regEx.IsMatch(textBox1.Text))
      {
       MatchCollection matches = regEx.Matches(textBox1.Text);
        
        // Show first result
       showMatch(matches[0]);
      }
    }

    private void showMatch(Match match)
    {
      textBox1.SelectionStart = match.Captures[0].Index;
      textBox1.SelectionLength = match.Captures[0].Length;
    }
  }
}


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

 

Вопрос #000300: Как_декодировать_Url_в_JavaScript?_(спецсимволы...

Автор вопроса: Дмитрий // 15.06.2007 / 12:08

Помогите декодировать спецсимволы из url при помощи JavaScript.
Например %20 - это пробел. Есть ли стандартные средства для того,
чтобы сделать это, или придется писать свою функцию?

Спасибо.

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

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

escape Method

Description
Encodes String objects so they can be read on all computers.

Syntax
escape(charstring)
The charstring argument is a String object to be encoded.

Remarks
The escape method returns a new String object (in Unicode format) that contains the contents of charstring. All spaces, punctuation, accented characters, and any other non-ASCII characters are replaced with %xx encoding, where xx is equivalent to the hexadecimal number representing the character. For example, a space is returned as "%20."
Characters with a value greater than 255 are stored using the %uxxxx format.


unescape Method

Description
Decodes String objects encoded with the escape method.

Syntax
unescape(charstring)
The charstring argument is a String object to be decoded.

Remarks
The unescape method returns a new String object that contains the contents of charstring. All characters encoded with the %xx hexadecimal form are replaced by their ASCII character set equivalents.
Characters encoded in %uxxxx format (Unicode characters) are replaced with the Unicode character with hexadecimal encoding xxxx.


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

 

Вопрос #000291: Помогите с Excel

Автор вопроса: "a3201" // 13.06.2007 / 04:57

Я нуб в visual basice и asp.net подскажите пожалуйста как мне выгрузить
содержимое dataseta или datagrida в excel.
Если не трудно скиньте ссылки на литературу, примеры или статьи посвященные
этой тематике.
З.Ы. Сам искал нашел одну ерунду. Пробовал сам сделать неполучилось. Жду
вашей помощи.

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

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

В ASP .NET мало вероятно, что на сервере будет установлен MS Office,
для этого обычно используют сторонние компоненты, например: ExcelXmlWriter
Он генерирует Excel-вский XML, данные засовываются в него циклом.
Полученные данные можно отдать пользователю прямо в браузер, в этом
случае надо указать тип контента:

001:
002:
Response.Clear()
Response.ContentType = "application/vnd.ms-excel"


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

 

Вопрос #000286: Как_узнать_объем_данных_в_SQL_Server_2005?

Автор вопроса: MisterX // 09.06.2007 / 04:39

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

Подскажите, как в SQL Server Management Studio 2005 можно узнать объем
занимаемого пространства моей базой данных?

Отвечает: EROS // 10.06.2007 / 19:15

Есть системная хранимая процедура sp_databases, которая возвращает
список баз данных и их размер в кб. Но для выполнения это хранимки вы
должны обладать правами админа

--
С уважением,
EROS mailto:eros@fromru.com

 

Вопрос #000283: Округление до заданных значений

Автор вопроса: Сергей // 07.06.2007 / 17:15

Здраствуйте.
Есть такая задача:
Стандартные диаметры: 100, 125, 140, 160 и т.д.
Значение 120 необходимо округлить до ближайшего стандартного диаметра.
Ответ должен быть - 125
Если 138, то естественно - 140
Если 104, то 100.
Спасибо.

--------------------------------------
Категория: --- Visual Basic .NET

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

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

Можно попробовать использовать Select Case:

001:
002:
003:
004:
005:
006:
007:
008:
Dim n As Integer
Select Case n
 Case 100 To 112
  Return 100
 Case 113 To 132
  Return 125
 'etc
End Select


Но это немного кривоватый вариант :)

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

001:
Dim arr() As Integer = {100, 125, 140, 160}


далее, Вам просто нужно будет определить, к какому числу подходит
указанное число:

001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
Dim n As Integer = 0
Integer.TryParse(InputBox("Введите число:"), n)
MsgBox("Число: " & n.ToString, MsgBoxStyle.Information)

For Each int As Integer In arr
 If int Mod n < 50 Then
  MsgBox("Диаметр: " & int.ToString, MsgBoxStyle.Information)
  Exit For
 End If
Next


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


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

 

Вопрос #000281: progress bar

Автор вопроса: Yura Zaletsiy // 07.06.2007 / 15:03

Здраствуйте. Я хочу создать под aspx компонент загрузчик на сервер с индикатором загрузки. Стандартная компонента мне не подходит в силу того, что она не имеет какой то возможности взаимодействия для отобржаения загрузки на сервер.

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

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

http://thinkingphp.org/demos/cake-timer/
http://swfupload.mammon.se/
http://www-128.ibm.com/developerworks/ru/library/wa-ajaxintro3/

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

 

Вопрос #000276: Проблема с датой в Access :(

Автор вопроса: "Anton" // 05.06.2007 / 13:02

Проблемма такая надо в access записать дату и время пришу так

INSERT INTO t1(tt) VALUES (#10/10/2000 10:10:10#)
выдает ошибкунеправильно определен обьек Parametr,

а когда INSERT INTO t1(tt) VALUES (#10/10/2000#) запрос выполняется

Че не так подскажите

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

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

INSERT INTO t1(tt) VALUES ('05.06.2007 20:35:00')

если дата текущая, то лучше:

INSERT INTO t1(tt) VALUES (Now)




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

 

Вопрос #000274: Куки

Автор вопроса: DJEMO // 04.06.2007 / 11:53

Привет!

Помогите понять принцип работы куков.
Я записываю их так:
Response.Cookies("ProjectX")("Name") = "Вася"
Response.Cookies("ProjectX")("LastName") = "Пупкин"
Response.Cookies("ProjectX")("Birthday") = "04.06.1001"

Но они не сохраняются, а вот если сделать так:

Response.Cookies("ProjectX")("Name") = "Вася"
Response.Cookies("ProjectX2")("LastName") = "Пупкин"
Response.Cookies("ProjectX3")("Birthday") = "04.06.1001"

то все нормально.

Ничего не понимаю, помогите пожалуйста. Работаю с ASP .NET

Отвечает: EROS // 04.06.2007 / 13:38

Правильно будет так:
 
001:
002:
003:
004:
005:
Dim myCookie As HttpCookie = New HttpCookie("UserSettings")
myCookie("Font") = "Arial"
myCookie("Color") = "Blue"
myCookie.Expires = Now.AddDays(1)
Response.Cookies.Add(myCookie)
 

 

Вопрос #000271: Помогите разобраться с фреймами

Автор вопроса: "Anton" // 03.06.2007 / 22:49

Уважаемые эксперты прошу вашей помощи.
Пишу на ASP.NET и Visual basic.
Проблемма вот в чем окно я фреймами поделил на 2 часть.
В одной области при загрузке формы в датагриде отображаются ссылки, при
нажатии на которые долен быть осуществлени переход на нужную страницу в
другой области.
Проблемма такая при нажатии на ссылки страница загружается в той же области
а не в другой.
Как решить такую проблемму.

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

Здравствуйте, Антон!

Укажите у фрейма атрибут name и/или id. У ссылок укажите
атрибут target, в качестве значения атрибута укажите имя фрейма, в
котором нужно открыть ссылку. Например:

<frame name="leftFrame" noresize src="page.aspx" >

ссылка будет такой:

<a href="link.aspx" target="leftFrame">Ссылка</a>


PS: Использовать фреймы не рекомендуется, особенно в больших
количествах ;)


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

 

Вопрос #000266: Помощь

Автор вопроса: Алекс В // 30.05.2007 / 13:23

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

Пишу на C#
1.В браузере при щелчке на ссылке выскакивает диалоговое окно
покажите пожалуйста пример как можно эмулировать нажатие кнопки сохранить на нем

2.как можно вытащить из responsa куки и session_id

Отвечает: Алексей Немиро // 30.05.2007 / 14:29

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

1. SendKeys.Send("~");

2.как можно вытащить из responsa куки и session_id

Если речь идет о ASP .NET, то куки вытаскиваются из Request:

001:
002:
Response.Cookies.Add(new HttpCookie("name", "value")); // ставим куки
Response.Write(Request.Cookies["name"].Value); // читаем куки


Session - это отдельный объект:

001:
002:
Session["name"] = "Вася Пупкин"; // добавляем в сессию имя
Response.Write(Session["name"]); // читаем из сессии



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

 


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

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

Наверх

 

 

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

Голосование на Kbyte.Ru через E-Mail!
Чтобы проголосовать через E-Mail, выберите ответ, если у Вас настроен почтовый клиент, должно появиться окно с новым сообщением, ничего не изменяйте, а просто отправьте пустое письмо и в течение некоторого времени Ваш голос будет зачтен.
Для голосования через сайт, перейдите по этой ссылке: http://kbyte.ru/Voting/.
Пользуетесь ли Вы системой «Эксперт» на нашем сайте?
На нашем сайте работает система «Эксперт», через которую любой желающий может задать вопрос Экспертам в области программирования и информационных технологий.
Да, только ей и пользуюсь! (2)
Да, периодически использую (5)
Вашей – нет, но иногда использую другие подобные системы (0)
Нет, предпочитаю использовать форумы (8)
Нет, мне это вообще не надо (2)
А как ей пользоваться? (1)
Нет, а что это? (9)

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

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

Наверх

 

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

Вопрос по БД | Автор: Kolya007
Добавлено: 25.06.2007 / 04:59 | ответов: 7 | просмотров: 14

У меня есть БД...
1) Я хочу чтобы при входе в систему(сайт, игру) для пользователя создавалась новая(пустая) временная(пока пользователь не покинет систему) БД на основе моей БД... Как это можно реализовать?
2) Насколько сильно это загрузит систему?
И к этому ещё вопрос:
Как с помощью CSS можно изменять вид элементов ввода(текстовые поля, кнопки и т.д.)...

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


Как ограничить вывод содержимого... | Автор: Kolya007
Добавлено: 25.06.2007 / 01:56 | ответов: 4 | просмотров: 16

По средствам опубликованной на этом сайте статьи http://kbyte.ru/Articles/ShowArticle.aspx?id=1 я сделал вывод новостей из БД... Как мне ограничить вывод данных по количеству и условию, желательно (но не обязательно) неизменив при этом SQL запрос...
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:
<%
Dim Conn
Dim DBpath
Dim RS
Dim strSQL
Dim i
Set Conn = Server.CreateObject("ADODB.Connection")
DBpath = Server.MapPath("./db/db.mdb")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DBpath
Set RS = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT * FROM news"
RS.Open strSQL, Conn
If RS.EOF = True Or RS.BOF = True Then
Response.Write("База данных пуста")
Else
Do While Not RS.EOF
If RS.EOF = True Or RS.BOF = True Then Exit Do
Response.Write("<table width='100%' align='center' border='1' class='l_n'><tr><td align='center' colspan='2' class='l_n'><!-- Раздел новости -->Раздел: " & _
RS.Fields("news_section") & _
"</td></tr><tr><td align='center' class='l_n'><!-- Тема новости -->Тема: " & _
RS.Fields("news_theme") & _
"</td><td align='center' class='l_n'><!-- Дата новости -->Дата: " & _
RS.Fields("date_news") & _
"</td></tr><tr><td colspan='2' class='l_n'><!-- Текст новости --><p align='justify'>" & _
RS.Fields("news_text") & _
"</p></td></tr><tr><td align='right' colspan='2' class='l_n'><!-- Автор новости -->Автор: " & _
RS.Fields("autor") & _
"</td></tr></table>")
RS.MoveNext
Loop
End If
RS.Close
Conn.Close
%>
Powered by EROS: CSC ver. 1.x
Modify by Aleksey S Nemiro special for Kbyte.Ru

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


Помогите с переводом... | Автор: Игорь Голов
Добавлено: 22.06.2007 / 10:31 | ответов: 1 | просмотров: 27

Помогите, пожайлуста, с переводом кода (на VB .Net 2005).
Код на С#:

001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
016:
//Перечисление компьютеров
 Static string[] GetComputerList(String domainName)
 {
  String path = String.Format(AD_TEMPLATE, domainName);
  Using (DirectoryEntry entry = New DirectoryEntry(path))
  {
   Using (DirectorySearcher searcher = New DirectorySearcher(entry, AD_COMPUTERS_FILTER))
   {
    ArrayList list = New ArrayList();
    foreach(SearchResult computerResult In searcher.FindAll())
     list.Add(computerResult.Properties[PROP_AD_CN][0]);
    Return (string[])list.ToArray(TypeOf(String));
   }
  }
 }
}
Powered by EROS: CSC ver. 1.x
Modify by Aleksey S Nemiro special for Kbyte.Ru

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


Как сохранить/восстановить Информацию, находящуюся в ListBox? | Автор: Игорь Голов
Добавлено: 21.06.2007 / 02:44 | ответов: 4 | просмотров: 35

Сабж :))

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


Помогите!!! | Автор: Igor
Добавлено: 20.06.2007 / 17:59 | ответов: 0 | просмотров: 29

Помогите, плиз! Срочно нужен самоучитель по Access 2003. Может у кого завалялся поделитесь если не жалко!

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


Выборка из БД | Автор: 5acred Phoenix
Добавлено: 19.06.2007 / 23:21 | ответов: 5 | просмотров: 40

Доброе время суток! Возникла проблема... Попробую описать ситуацию :-)
Хочу написать категоризатор на PHP. На сайте есть статьи, и каждая из них может входить в несколько категорий. Например:

Статья 1. Категории: Web, PHP, MySQL
Статья 2. Категории: PHP, MySQL
Статья 3. Категории: Web, MySQL

А фишка в следующем:

1. Юзер выбирает, например, категорию MySQL. Возвращается, как очевидно, все три статьи.
2. Потом выбирает категорию, например, Web. Возвращаются список из статей # 1 и 3.
3. И наконец выбирает PHP, и возвращается статья # 1

Получается что-то вроде многоступенчатого фильтра... Так вот, можно ли, имея список выбранных категорий (у каждой есть id), выбрать подходящие статьи в одном запросе?

И как хранить эту инфу в БД? На ум приходит только такое:

1. Таблица articles (id, name, ...) со списком статей;
2. Таблица categories (id, name) со списком категорий;
3. Таблица assoc (a_id, c_id) с соответствиями между статьями и категориями.

Эээ, мутно как-то объяснил... Если что не понятно спрашивайте — попытаюсь пояснить :-)
Очень надеюсь на вашу помощь!..

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


Помогите советом ))) | Автор: Игорь Голов
Добавлено: 18.06.2007 / 21:09 | ответов: 8 | просмотров: 55

Код
001:
002:
003:
004:
005:
006:
007:
008:
For i = 0 To Me.lbSources.Items.Count - 1
        For j = 0 To Me.lbDestinations.Items.Count - 1
          MsgBox(Me.lbSources.SelectedItems(i).ToString & vbCrLf & Me.lbDestinations.SelectedItems(j).ToString)
          Microsoft.VisualBasic.FileIO.FileSystem.CopyFile(Me.lbSources.SelectedItems(i).ToString, Me.lbDestinations.SelectedItems(j).ToString, True)
        Next j


      Next i
Powered by EROS: CSC ver. 1.x
Modify by Aleksey S Nemiro special for Kbyte.Ru


выдает ошибку "Index was outside the bounds of the array". Как исправить возникшую проблему?

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


RichTextBox | Автор: Stuart
Добавлено: 18.06.2007 / 15:17 | ответов: 0 | просмотров: 29

Аааа.... помогите!!!!
как мне в VB6 или .net сделать так, чтобы при добалвения картинки в RichTextBox
непроисходило это раздражающее мерцание?

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


RichTextBox | Автор: pasha
Добавлено: 16.06.2007 / 18:36 | ответов: 2 | просмотров: 50

1.Как вставить медиа-файл (*.jpg, *.avi, и др. в RichTextBox?)
2.Как сохранить содержимое RichTextBox в Документ MS Word (c сохранением форматирования)?
3. Как вставить таблицу (и ячейки, столбцы, строки) в RichTextBox?

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


Идиотские законы США :)) | Автор: Алексей
Добавлено: 13.06.2007 / 08:37 | ответов: 2 | просмотров: 71

Слайчайно нашел в сети:

В Айдахо запрещено рыбачить, сидя на верблюде.

В Балтиморе не разрешается приходить в театр со львами.

В городе Провиденсе, Род Айланд, в магазинах запрещено по воскресеньям продавать зубную щетку и пасту одному и тому же покупателю.

В Аризоне под угрозой штрафа запрещено класть спать осла в ванной.

В городе Чико в Калифорнии штраф до 500 долларов, грозит всякому, кто взорвет в пределах города ядерное устройство. Интересно, кто это штраф будет взымать?

В Нью Орлеане нельзя призязывать крокодилов к гидрантам.

Если вы в Техасе, даже не думайте стрелять по бизонам со второго этажа отеля.

В Канзасе все пешеходы, пересекающие дорогу ночью, должны носить световые отражатели.

В Алабаме запрещено водить машину с завязанными глазами.

В Миннесоте вам грозит попасть в тюрьму за то, что вы спите голым.

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

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

В городе Юрика в Иллинойсе, мужчинам, носящим усы, запрещается целовать женщин.

В городе Гейлсбур, опять же в Иллинойсе под угрозой штрафа в 1000 долларов запрещается бить крыс бейсбольной битой.

В Индиане запрещено принимать ванны в период между Октябрем и Мартом.

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

В Моухейв Каунти в Аризоне вора, попавшегося на краже мыла, предписывается мыть этим мылом до тех пор, пока оно не кончится.

В Небраске вам грозит арест, если ваше дите начнет икать во время службы в церкви.

В городе Волдвин парк в Калифорнии официально запрещено заезжать на велосипеде в бассейн.

На Аляске запрещается поить спиртными напитками лосей.

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

В городе Оттумва в Айове мужчина не может подмигивать женщине, если он с ней не знаком.

В Лос Анжелесе существует постановление, запрещающее купать одновременно двух младенцев в одной и той же купели.

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

В Кармеле в штате Нью Йорк, мужчине грозит штраф, если он выйдет на улицу в штанах, которые не подходят к пиджаку.

В Сэнт Луисе запрещается сидеть на мостовой и распивать пиво из ведра.

В Хартфорде в Коннектикуте запрещено переходить дорогу на руках.

В Бальтиморе запрещается швырять копны сена со второго этажа.

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

В Карризоз в Нью Мескико женщинам запрещается появляться на публике небритыми.

В Пенсильвании не разрешается, чтобы в доме вместе проживали более 16-ти женщин (по мнению законодателей- 17 женщин- это уже бордель). Закон, однако, позволят совместно жить 120-ти мужчинам.

В Мичигане женщина не может постричь волосы без предварительного согласия мужа.

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

В Кентуки женщинам запрещено ходить по шоссе в купальном костюме. Исключение- если ее сопровождают по крайней мере двое полицейских или если она вооружена палкой.

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

В Мобил в том же штате водителям запрещается гудеть проходящим мимо женщинам. Женщинам в этом городе также запрещается носить туфли на высоких каблуках.

Всех, однако, переплюнули муниципальные власти города Монтгомери в той же Алабаме. Они запретили пешеходам открывать на улицах зонты, чтобы не пугать лошадей.

В Калифорнии есть закон, гарантирующий жителям штата право загорать на солнце.

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


Наверх

 

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

В этой статье мы создадим пример базы данных 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 / 14:13 | просмотров: 582 | платформа: ASP .NET (VB)

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

Как преобразовать десятичное число в восьмиричное?
Дата добавления: 16.08.2006 / 20:36 | просмотров: 547 | платформа: VB

Как разрешить вводить в TextBox только цифры?
Дата добавления: 04.08.2006 / 16:55 | просмотров: 728 | платформа: ASP .NET (VB)

Как сделать полупрозрачную форму?
Дата добавления: 01.08.2006 / 17:25 | просмотров: 701 | платформа: VB .NET

Анализ даты стандарта MM/DD/YYYY и MM/DD/YY
Дата добавления: 24.03.2007 / 10:59 | просмотров: 232 | платформа: RegEx

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

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

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

Как сделать часы?
Дата добавления: 16.08.2006 / 23:30 | просмотров: 783 | платформа: VB

 

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

Наверх

 

Юмор на Kbyte.Ru

К Билл Гейтсу подходит сын и говорит:
- Пап, покажи, что такое многозадачность!
- Погоди, сынок, сейчас дискету доформатирую…

 

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

 

Лежит пьяный парень на перроне и умирает со смеху.
Окружающие его в течение 10 минут не выдержали и вызвали "Скорую". Связывающим его санитарам он объясняет:
- Ребята, меня пятьдесят человек в армию провожали. Они уехали, а я остался.
end data of the request.

 

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

 

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

 

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

 

Святой Петр (СП) с Господом (Г) разговаривают.
СП: - Что это ты, Господи, на людишек-то осерчал?
Г: - Да нет, с чего это ты взял?
СП: - Дык давечa вон, пол Сиэтла разбомбил.
Г: - Да что ты, это просто опять винда заглючила и выдала ошибку, мол, надо мне к разработчику обратиться.
СП: - Ну а ты?
Г: - Ну а что я, я и обратился...

 

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

 

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

 

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

 

Стоит взвод молодых бойцов. Старшина:
- По порядку номеров рассчитайсь!!!
Солдат-программист:
- Можно вопрос ?
- Можно...
- А в какой системе? Десятичной? Шестнадцатеричной?
- Для дураков объясняю, в десятичной!!!
- Понял! Нулевой!!!

 

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

 

В тридевятом царстве, в тридесятом государстве жил-был Иван-дурак, и была у него триодиннадцатая винда...

 

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

 

Лежат в корзине 3 программы, разговаривают.
1->2: Тебя за что?
2->1: За то, что я не под Windows. А тебя?
1->2: За то, что я под Windows.
1&2->3: А тебя?
3: За то, что я - Windows

 

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

 

- А вы поменяете пять пачек обычного порошка на один грамм необычного?

 

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

 

В одном портовом городке жила девушка Надя. Примечательна она была тем, что не могла отказать ни одному матросу. Этот городок так и назывался: Мыс доброй Надежды.

 

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

 

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

Наверх


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

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

Copyright (c) Nemiro AS, 2005-2007


В избранное