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

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



Выпуск # 420


http://www.kbyte.ru/

 

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

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

 

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

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

    Вопрос #001017: Бесплатные программы

    Вопрос #001014: Avi и Mpeg4 в Visual Basic

    Вопрос #000952: Обработка файлов в C# (.NET 2.0)

    Вопрос #000947: Секундомер

    Вопрос #000937: DLOOKUP??

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

    Открытие и закрытие CD

    Помогите - замена исполняемого файла на сервере на новый

    Regex

    Помогите - сортировка методом пузырька Visual Basic

    Новый проект посвященный Visual Basic .NET

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

    Нестандартная форма

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

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

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

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

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

Юмор на Kbyte.Ru

 

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

 

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


Вопрос #001017: Бесплатные программы

Автор вопроса: Sarj // 03.06.2008 / 08:56

Уважаемые эксперты, поскажите пожалуйста бесплатный аналог Corel Draw. Очень надо...

.....

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

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

http://inkscape.org/

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

 

Вопрос #001014: Avi и Mpeg4 в Visual Basic

Автор вопроса: алексей // 02.06.2008 / 12:36

Как можно проигрывать эти форматы в вижал бэйсик? Пример на сайте не работает.

.....

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

Здравствуйте, Алексей.

Можно использовать MediaPlayer. Для этого его нужно подключить к
проекту через меню Project (Проект) -> Components (Компоненты), в
появившемся окне найти и выбрать Windows Media Player. Далее, в
панели инструментов должна появиться иконка плеера, который можно
разместить на форме. Указать файл для проигрывания можно
в свойство URL, или FileName в зависимости от версии проигрывателя.

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

 

Вопрос #000952: Обработка файлов в C# (.NET 2.0)

Автор вопроса: Сергей // 09.05.2008 / 18:07

Доброе время суток!
В общих словах, такая задача поставлена передо мной: На веб-странице
пользователь выбирает файл, нажимает кнопку "Импорт" и из этого файла
данные импортируются в таблицу БД Oracle.
Файл должен быть текстовым, первые 2 строки- информация о времени и
логине того, кто выгружал. После них идут строки данных, поля
разделяются симоволом | .
Просьба дать ссылки на документацию по работе с файлами, которые могут
помочь :-)

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

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

Необходимые классы и функции для работы с файлами лежак в пространстве имен System.IO. Также Вам могут понадобиться классы для работы с регулярными выражениями, которые лежат в пространстве имен System.Text.RegularExpressions.
Что касается импорта файлов, то данные можно взять прямо из потока FileUpload.PostedFile.InputStream, передать их в StreamReader и обработать при помощи регулярных выражений.

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

 

Вопрос #000947: Секундомер

Автор вопроса: Александр // 08.05.2008 / 17:40

Добрый день!
Как сделать секундомер на сайте kbyte.ru много но вот все они выдают результат как 345сек, а мне надо 1:45:01 то есть в временом формате. Как сделать???

.....

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

Здравствуйте, Александр.

Зная, что в минуте 60 секунд, в часе 60 минут, а в сутках 24 часа, можно легко превратить 345 секунд в нужный формат.
001:
002:
003:
004:
005:
006:
007:
008:
009:
Dim sec As Integer
sec = 345
Dim ssec As Integer, min As Integer, hour As Integer
If sec > 59 Then
 min = Int(sec / 60)
 ssec = sec Mod 60
End If
If min > 59 Then hour = Int(min / 60)
MsgBox sec & " сек. = " & hour & " ч. " & min & " мин. " & ssec & " сек."



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

 

Вопрос #000937: DLOOKUP??

Автор вопроса: Алексей // 05.05.2008 / 16:37

Почему те поля формы, которые имеют в ControlSource функцию Dlookup не записывают значение полей в конечную таблицу?

--------------------------------------
Категория: --- MS Access

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

Здравствуйте, Алексей.

Из справки MS Access: Функция Dlookup
При использовании этой функции не учитываются
несохраненные изменения записей подмножества. Если функция
DLookup должна использовать измененные значения, необходимо сначала сохранить
изменения с помощью команды Сохранить запись в меню
Записи, с помощью перемещения фокуса на другую запись или
метода Update.


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

 


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

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

Наверх

 

 

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

Открытие и закрытие CD | Автор: petr
Добавлено: 26.12.2008 / 02:33 | ответов: 0 | просмотров: 28

Option Explicit

Private Sub Form_Load()
MMControl1.DeviceType = "CDAUdio"
MMControl1.Command = "open"
MMControl1.TimeFormat = 0
End Sub

Private Sub Form_Unload(Cancel As Integer)
MMControl1.Command = "stop"
MMControl1.Command = "close"
End Sub
Private Function toHMS(time As Long) As String
Dim H As Integer
Dim M As Integer
Dim S As Integer

H = Int((time / 1000) / 3600)
M = Int((time / 1000 Mod 3600) / 60)
S = (time / 1000 Mod 3600) Mod 60
If H > 0 Then toHMS = Str(H) + ":"
toHMS = toHMS + Format(M, "0#") + Format(S, "0#")
End Function

Private Sub MMControl1_StatusUpdate()
Select Case MMControl1.Mode
Case 530: 'msimodeStop
Label1.Caption = "stop" & Str(MMControl1.Tracks)
If MMControl1.Tracks > 1 Then
Label1.Caption = "нажмите на кнопку PLAY"
Label2.Caption = _
"Треков: " + Str(MMControl1.Tracks) + _
"Время звучания: " + _
toHMS(MMControl1.Length)
Else
Label1.Caption = "Диск не хуя не музыкальный"
Timer1.Enabled = True
End If
Case 540: ' mcimodePlay
Timer1.Enabled = False
Label1.Visible = True
Label2.ForeColor = vbYellow
If MMControl1.Position < _
MMControl1.TrackPosition + _
MMControl1.TrackLength Then
Label1.Caption = _
"треков: " + Format(MMControl1.Track, "0#") _
+ " " + toHMS(MMControl1.Position - _
MMControl1.TrackPosition)
Else
If MMControl1.Position < MMControl1.Length Then
MMControl1.Track = MMControl1.Track + 1
Label1.Caption = _
"треков:" + Format(MMControl1.Track, "#") _
+ " " + toHMS(MMControl1.Position - _
MMControl1.TrackPosition)
Else
MMControl1.Command = "stop"
End If
End If
Case 550: 'msimodePause
Label1.Caption = "pause"
Label2.Caption = "Треков: 0 Время звучания: 00:00"
Timer1.Enabled = True
Case Else
Label1.Caption = "mode:" & Str(MMControl1.Mode)
End Select
End Sub

Private Sub Timer1_Timer()
DoEvents
Label1.Visible = Not Label1.Visible
End Sub

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


Помогите - замена исполняемого файла на сервере на новый | Автор: Стасик
Добавлено: 23.12.2008 / 16:45 | ответов: 0 | просмотров: 42

Если на клиенте изменился файл, то он должен заменить старый файл на сервере...

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


Regex | Автор: abra
Добавлено: 22.12.2008 / 15:51 | ответов: 7 | просмотров: 217

Доброго времени суток.

Не могу понять как я вывожу результат парсинга на html страницу. Вот мой код.
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:
string strURL = "MyURL";
    HttpWebRequest Request;
    HttpWebResponse Response;
    StreamReader st;
    string strHTML;
    Request = (HttpWebRequest)WebRequest.Create(strURL);
    Request.Method = "GET";
    Response = (HttpWebResponse)Request.GetResponse();
    st = new StreamReader(Response.GetResponseStream(), Encoding.GetEncoding(1251));

    string outStr = string.Empty;
    Regex r = new Regex("MyPatern", System.Text.RegularExpressions.RegexOptions.Multiline);  
    if (st!=null)
      {
        if (System.Text.RegularExpressions.Regex.IsMatch(strHTML, patern1))
,,,,
каким то образом нужную выборку внести в outStr.
,,,,          
Console.WriteLine(strHTML);
        else
            Console.WriteLine("Сбой на сервере");
      }

    strHTML = st.ReadToEnd();
    st.Close();
    Response.Close();
    Request.Abort();

Colorized by: Eros.CodeSyntaxColor Engine


........ и почему Console.WriteLine не выводит результат на страницу?

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


Ответ # 1 | Автор: Neco
Добавлено:22.12.2008 / 17:06
а как это должно выглядеть? у пользователя должно открыться окно консоли и там отобразиться данный текст?
попытайтесь, по крайней мере, через response.write, хотя это тоже не совсем правильно.
опять-таки strHTML, судя по коду, заполняется позже, чем используется - разве студия не подсветила это дело?

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


Ответ # 2 | Автор: abra
Добавлено:22.12.2008 / 17:27
,,,через response.write, хотя это тоже не совсем правильно,,,

а как привильно?

ЗЫ Какой класс надо добавить, что б response.write читало?
'System.Net.HttpWebResponse' does not contain a definition for 'Write'

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


Ответ # 3 | Автор: Neco
Добавлено:22.12.2008 / 21:11
есть System.Web.HttpContext.Current.Response.Write("hello world");
также Page.Response или this.Response.
а правильным было бы разместить на странице какой-нибудь контрол и поместить результат парсинга в него через его собственные свойства. ну и конечно не забыть защитить спец. символы, чтобы они не участвовали в рендеринге.

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


Ответ # 4 | Автор: abra
Добавлено:23.12.2008 / 14:43
Neco
Большое спасибо. Имено так и сделаю.

а по поводу того, с помощью какой ф-ции вносить выборку в outStr? Подозреваю, что с помощью какого то метода Match, но вот какого именно пока не пойму...

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


Ответ # 5 | Автор: abra
Добавлено:23.12.2008 / 18:00
вопрос меняется :о)
Методом Match, получаю свою выборку. При выводе на страницу, получаю строку с текстами и тегами.

При попытке загнать все это в sntring, получаю ошибку.

Cannot implicitly convert type 'System.Text.RegularExpressions.Match' to 'string'

вопрос как конвертировать в стринг?

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


Ответ # 6 | Автор: Neco
Добавлено:23.12.2008 / 18:34
однако, видимо, первый язык изучаете.
если я правильно понял вопрос, то дело в том, что Match это матрёшка - внутри есть Groups, а внутри групп Captures.
Соот-но string значение можно получить для каждой из этих матрёшек из свойства Value.

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


Ответ # 7 | Автор: abra
Добавлено:24.12.2008 / 14:20
Действительно с NET никогда не пересекались. Благодарю

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


Помогите - сортировка методом пузырька Visual Basic | Автор: #Nii
Добавлено: 18.12.2008 / 23:46 | ответов: 10 | просмотров: 284

Вот мне надо сделать, сортировку методом пузырька в Delphi или Visual Basic. И чтоб данные брались из файла, и записывались в другой файл.

Исходник пузырька

001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
016:
017:
018:
019:
020:
021:
Sub Sort(Mus() As Long)
  Dim n As Long, i As Long, j As Long, tmp As Long
  i = 1
  Do While (i < UBound(Mus))
    If Mus(i) > Mus(i + 1) Then
      tmp = Mus(i)
      Mus(i) = Mus(i + 1)
      Mus(i + 1) = tmp

      If i > 1 Then
        i = i - 1
      Else
        i = i + 1
      End If
    Else
      i = i + 1
    End If
  Loop
End Sub

Colorized by: Eros.CodeSyntaxColor Engine



И создание и открытие файла



Для создания файла используем метод Create класса File и для создания нового текстового файла метод CreateText класса File.



Пример:



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

System.IO.File.Create("Path")

System.IO.File.CreateText("Path")

End Sub


Path – полный путь и имя + расширение файла


Для открытия файла используем метод Open класса File.



Только вот незнаю как соединить их, чтоб работало

Помогите пожалуйста!

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


Ответ # 1 | Автор: andreymp
Добавлено:19.12.2008 / 13:53
Учитывая тематику форума (хотя автор приводит пример создания файла на дотнете) рискну предположить что речь идет о VB6.
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:
'На форме одна кнопка. Подключаем в референсах библиотеку Microsoft Scripting Runtime
'Допустим что входной файл престаляет собой строку вида 3,22,66,44,88,,23,97,345,321
Private Sub Command1_Click()
  Dim MyArrStr() As String
  Dim MyArr() As Long
  Dim sStr As String
  Dim i As Long
  
  'Читаем из файла
  sStr = MyRead("in.txt")
  'Получаем массив строк
  MyArrStr = Split(sStr, ",")
  i = 0
  ReDim MyArr(i)
  'Преобразуем в массив Long
  For i = LBound(MyArrStr) To UBound(MyArrStr)
    ReDim Preserve MyArr(i)
    MyArr(i) = CLng(MyArrStr(i))
  Next i
  'Сортируем
  Call Sort(MyArr)
  'Собираем строку (чтоб вид бил как у входного файла)
  sStr = ""
  For i = LBound(MyArr) To UBound(MyArr)
    MyArrStr(i) = CStr(MyArr(i))
    sStr = sStr & MyArrStr(i)
    If i <> UBound(MyArr) Then sStr = sStr & ","
  Next i
  'Записываем файл
  Call MyWrite(sStr, "out.txt")
End Sub

Private Sub Sort(Mus() As Long)
  Dim n As Long, i As Long, j As Long, tmp  As Long
  i = 0 'немного подправил, чтоб начинало с 0
  Do While i < UBound(Mus)
    If Mus(i) > Mus(i + 1) Then
      tmp = Mus(i)
      Mus(i) = Mus(i + 1)
      Mus(i + 1) = tmp
      If i > 1 Then
        i = i - 1
      Else
        i = i + 1
      End If
    Else
      i = i + 1
    End If
  Loop
End Sub

'Процедура записи, используется FSO
Private Sub MyWrite(MyStr As String, outFile As String)
Dim fsoSave As New FileSystemObject
Dim filSave As TextStream
Set filSave = fsoSave.CreateTextFile(App.Path & "\" & outFile, True)
filSave.WriteLine (MyStr)
filSave.Close
End Sub

'Процедура чтения, используется FSO
Private Function MyRead(inFile As String) As String
Dim fsoSave As New FileSystemObject
Dim filSave As TextStream
Set filSave = fsoSave.OpenTextFile(App.Path & "\" & inFile)
MyRead = filSave.ReadLine
filSave.Close
End Function

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


Ответ # 2 | Автор: #Nii
Добавлено:20.12.2008 / 00:16
А потом начать подпрограмму "Пузырька" ?
с кода

Sub Sort(Mus() As Long) ?

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


Ответ # 3 | Автор: andreymp
Добавлено:20.12.2008 / 12:51
Нет. Она уже выполнится. Это вся программа целиком. Ставишь на форму кнопку и копипастишь этот текст. Просто нажми кнопку и посмотри в папке с программой файл out.txt.

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


Ответ # 4 | Автор: #Nii
Добавлено:20.12.2008 / 20:49
А как сделать, чтоб я мог другой кнопкой выбрать входной файл, чтоб данные из этого файла загрузились в программу?

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


Ответ # 5 | Автор: #Nii
Добавлено:20.12.2008 / 23:20
А как еще загрузить данные в окно (text или label) чтоб значения показывались сначала в окне, потом нажимаешь полученные данные переходят в другое окно, а потом нажав кнопку сохранить все в файл?

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


Ответ # 6 | Автор: #Nii
Добавлено:20.12.2008 / 23:55
Почему-то он у меня не запускается, поставил кнопку на форму. Пишет ошибку

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


Ответ # 7 | Автор: #Nii
Добавлено:21.12.2008 / 14:23
Все подключил в референсах Microsoft Scripting Runtime все идет теперь. Только вот терь надо чтоб выводилось в Textbox значение из in.txt а во второй textbox уже значения после сортировки. Как это сделать?

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


Ответ # 8 | Автор: #Nii
Добавлено:22.12.2008 / 22:40
Наверно я не правильно выразился, надо чтобы на форме была кнопка при нажатии которой в Textbox загрузились числа из файла, и чтоб они были видны в программе, при нажатии другой кнопки массив сортируется, и в самой программе должно показаться массив уже обработанный. После чего нажимаем кнопку сохранить, значение сохраняется в файл.

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


Ответ # 9 | Автор: Stuart
Добавлено:23.12.2008 / 00:43
Вот вроде все правильно написал, осталось тебе её только до оптимизировать ))
Если хочеш скажи мыло я те пришлю исходник в ZIP архивчике=))
Кинь на форму 3 текст бокса
3 кнопки
1 TextBox подпиши как: Путь к файлу с цифрами
2 TextBox: До сортировки
3 TextBox: После сортировки
1 кнопка: Вывод цифр из файла
2 кнопка: Сортировать
3 кнопка: Сохранить отсортированный массив в файл


Вот код:

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:
Option Explicit
Option Base 1

Dim CifriIzFile(900000) As Long
Dim M As Integer
Dim MIN As Integer
Dim H As Integer
Dim j As Integer
Dim i As Long
Dim N As Integer
Dim LenFile As Long


Private Sub Command1_Click()
Dim FN As Integer
FN = FreeFile
Open Text3.Text For Output As #FN
Print #FN, Text2.Text
Close #FN
MsgBox "Данные успешно сохранены", 64, "Информация"
End Sub

Private Sub Command2_Click()
Dim simvol As String
Dim j As Long
LenFile = FileLen(Text3.Text)
Open Text3.Text For Input As #1
For i = 1 To LenFile
simvol = Input(1, #1)
CifriIzFile(i - j) = CInt(simvol)
Text1.Text = Text1.Text + CStr(CifriIzFile(i - j))
Next i
Close #1
End Sub

Private Sub Command3_Click()

For i = 1 To LenFile
  MIN = Abs(CifriIzFile(i))
  H = i
    For j = i + 1 To LenFile
       If CifriIzFile(j) < MIN Then
       MIN = CifriIzFile(j)
       H = j
       End If
    Next j
    
    If H > i Then
       N = CifriIzFile(i)
       CifriIzFile(i) = CifriIzFile(H)
       CifriIzFile(H) = N
    End If
Next i

For i = 1 To LenFile
  Text2.Text = Text2.Text & CStr(CifriIzFile(i))
Next i
End Sub

Colorized by: Eros.CodeSyntaxColor Engine


PS: Используйте алгоритм сортировки Чарльза Хоара(Метод разделением) этот алгоритм сортировки самый быстрый, в отличии от Пузырькового

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


Ответ # 10 | Автор: Stuart
Добавлено:23.12.2008 / 00:54
блин касяк убери в command2 строчку: Dim j As Long
и затем ниже удали в коде эту переменную)))

И еще программа работает только с числами от 0 до 9


речь шла о VB6

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


Новый проект посвященный Visual Basic .NET | Автор: Алексей
Добавлено: 18.12.2008 / 12:12 | ответов: 3 | просмотров: 134

Открылся новый проект, посвященный программированию на Visual Basic .NET - http://vbnet.su
Регистрация только по приглашению :) Код приглашения (инвайт) для пользователей Kbyte.Ru: kbyte
Ссылка для регистрации: http://vbnet.su/join?invite=kbyte

Количестве "мест" ограничено ;)

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

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


Ответ # 1 | Автор: andreymp
Добавлено:18.12.2008 / 16:22
В общем неплохо, но:
1. Может стоило сначала раскрутить этот проект? В общем то ничего не мешает раскручивать их паралельно, если хватит сил, времени и денег.
2. Использование vbnet в названии как то не совсем корректно по отношению к vbnet.ru.
3. Учитывая активность на kbyte.ru (который более менее раскручен):
а) Быстро получить любой ответ на любой вопрос можно на vbnet.ru ( странице на 2-3 может даже и по теме, а если повезет то и правильный) :)
б) Без особого флуда - на sql.ru, исходники.ru, vbstreets и пр. Конкуренция очень большая.
в) На очень сложные вопросы - исходники.ru.
Но это все ИМХО.
Постараюсь поддержать, Когда письмо на активацию аккаунта придет. Удачи.
Андрей.

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


Ответ # 2 | Автор: Алексей
Добавлено:18.12.2008 / 16:53
1. Может стоило сначала раскрутить этот проект?

этому проекту уже три года..
2. Использование vbnet в названии как то не совсем корректно по отношению к vbnet.ru.

и к vbnet.com, vbnet.info, vbnet.org :)
Да и на ру флудилня, ничего некорректного не вижу в этом.

а) Быстро получить любой ответ на любой вопрос можно на vbnet.ru (
странице на 2-3 может даже и по теме, а если повезет то и правильный):

учитывая раскрученность vbnet.su, сейчас там можно получить быстро
ответ на любой вопрос, возможно даже правильный, ибо я пока там :)
Здесь я сейчас редко отвечаю на вопросы, но прейдет время и на kbyte.ru
будет праздник. Для kbyte.ru у меня запланирован отдельный план
мероприятий.

б) Без особого флуда - на sql.ru, исходники.ru, vbstreets и пр. Конкуренция очень большая.

за флуд и тут и на vbnet.su можно в баню попасть.
Конкуренция нормальная, большой её назвать нельзя.

в) На очень сложные вопросы - исходники.ru.

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

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

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


Ответ # 3 | Автор: andreymp
Добавлено:19.12.2008 / 11:25
за флуд и тут и на vbnet.su можно в баню попасть.
И это правильно.
и даже "спасибо" не всегда говорят
Это точно. Бывает даже нахомят непоняв ответа. :(

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


Наверх

 

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

Нестандартная форма
Автор: Zhenik Ipatov | добавлено: 05.05.2008 / 12:42 | просмотров: 1815

Первое что бросается в глаза, когда первый раз используешь программу это конечно же её облик, внешний вид. Есть вероятность что если пользователю не понравится внешний вид окна, то он не будет пользоваться продуктом. Значит нам, не побоюсь этого слова, программистам нужно как можно лучше, удобнее, понятнее, красивее и приветливее сделать лицо программы. Нужно как можно эффектнее преподнести программу. С самого первого появления Windows окна получили прямоугольный стандарт и все User Control’ы

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

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

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

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

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

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

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

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

 

Статьи на Kbyte.Ru

Наверх

 

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

Как удалить все ноды (Nodes) из TreeView?
Дата добавления: 24.03.2007 / 12:15 | просмотров: 2000 | платформа: VB .NET

Как запретить пользователю перемещать форму?
Дата добавления: 31.07.2006 / 12:05 | просмотров: 1643 | платформа: VB

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

Как удалить лишние пробелы из текста?
Дата добавления: 16.08.2006 / 19:05 | просмотров: 2953 | платформа: VB

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

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

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

Как прочитать текстовой файл?
Дата добавления: 01.08.2006 / 11:24 | просмотров: 2381 | платформа: ASP

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

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

 

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

Наверх

 

Юмор на Kbyte.Ru

Психиатр говорит своей знакомой:
- Как поживает ваш муж?
- Доктор, но я не замужем!
- Да? Значит ваш муж холостяк!
end data of the request.

 

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

 

Утром звонит Билл Гейтс к врачу:
- Доктор у меня начался объектно-ориентный понос. Что делать?

 

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

 

Каждую секунду, тыкая в клавиши, мы давим насмерть не менее 1000 микробов.

 

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

 

Пришел в новую контору работать. У всех юзверей выясняю пароли на вход в сетку. Один из них отвечает: пароль две звездочки. Ну это, говорю, я понял, а пароль-то какой? Две звездочки. Ну ясно, что на экране вы видите две звездочки, а пароль-то какой? Ну какой же вы непонятливый, вот смотрите: и жмет shift+8, shift+8. Я упал. Людям надо верить. :)

 

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

 

- Ну рассказывай, как вчера время провели?
- Заказали крабов, омаров, устриц, дорогого вина, бутылочку "Хеннеси" и - прикинь, облом - на улице скамеек свободных не было!

 

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

 

Подходит пользователь к программисту и говорит:
- Мне нужен генератор случайных чисел.
Тот, не оборачиваясь:
- Четырнадцать...

 

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

 

Ехали как-то на джипе четыре братка, вдруг в них врезается сзади старая шестерка. Братки злые выходят из машины и видят из шестерки выходит старый дед. Братки ему:
Ну все дед ты попал!!!
Дед: Не злитесь ребятки, у меня сын на птицефабрике работает, я ему позвоню, он все уладит.
Братки думают ладно раз на птицефабрике работает, значит деньги есть.
Дед позвонил, приезжают через десять минут СОБРовцы, всех братков на землю повалили.
Подходид СОБРовец к деду и говорит:
Батя, сколько раз повторять можно, не на птицефабрике, а в отряде ОРЕЛ!!!

 

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

 

Сидят два программиста в офисе. Вдруг звонок телефонный, на проводе шеф:
- Ну, ребята, чем занимаетесь?
- Козла забиваем!
- В домино играете?!
- Да нет, в DOOM!

 

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

 

Неправду говорят, что MS Windows - система глупая. Это единственная ОС в мире, обладающая чувством юмора. Пример привести? Только система, обладающая чувством юмора, могла бы обнаружить мой модем Rockwell 14.400 и определить его как "Sound Blaster (Rockwell)", причём пытаться проигрывать на нём МР3, причём модем на самом деле пищал!!!

 

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

 

- Что такое нормальная квартира для нового русского?
- Это когда в углу стоит незаметный аквариум, а в нем плавает бегемот.

 

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

 

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

Наверх


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

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

Copyright (c) Nemiro AS, 2005-2007


В избранное