Программирование (VB,C#,ASP,.NET): новости, советы, примеры (comp.soft.prog.vbaspsharpnet) : Рассылка : Subscribe.Ru

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

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

Рассылка закрыта

Вы можете найти рассылки сходной тематики в Каталоге рассылок.

← Июль 2007 →
	1
2	3	4	5	6	7	8
9	10	11	12	13	14	15
16	17	18	19	20	21	22
23	24	25	26	27	28	29
30	31

Автор

Алексей Немиро

Статистика

1.234 подписчиков
-1 за неделю

← Все выпуски →

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

Выпуск # 165

http://www.kbyte.ru/

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

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

Ваш R-KDR-19826

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

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

Вопрос #000389: Программный перевод компьютера в спящий режим

Вопрос #000383: Локализация приложения

Вопрос #000380: Visible and FOR

Вопрос #000379: Ссылка в ВБ 6.0

Вопрос #000376: Открыть окно браузера с результатами поиска

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

Почтовый клиент

Не судите строго! Конструктивная критика приветствуется!

Как правильно вызвать форму из DLL

Программа или специальный скрипт к сайту...

iframe

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

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

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

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

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

Работаем с MIME

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

Юмор на Kbyte.Ru

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

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

Вопрос #000389: Программный перевод компьютера в спящий режим

Автор вопроса: Игорь Голов // 23.07.2007 / 02:15

Доброго времени суток!
 Возникла проблема - необходимо переводить компьютер в спящий режим из разрабатываемой программы.
 
 Как это сделать?
 
 Платформа: Microsoft Visual Basic 2005.
 
 Спасибо!
 
 --------------------------------------
 Категория: --- Visual Basic .NET

Отвечает: EROS // 23.07.2007 / 09:38

Application.SetSuspendState Method
 Suspends or hibernates the system, or requests that the system be 
 suspended or hibernated.
  
 Подробности тут
  
 С Уважением, EROS 

Вопрос #000383: Локализация приложения

Автор вопроса: weltkind // 21.07.2007 / 06:23

День добрый! В очередной раз обращаюсь к вам
за помощью!!
 Решил я перевести свою программку на другой язык (немецкий) решил 
 реаализовать это таким образом
 в свойствах формы пункт Localizable выставить значение True
 и всем обектам в пункте Text ввести соответствующие надписи на др языке 
 задать предварительно в свойствах формы в пункте Language выствить 
 необходимый мне язык но тут возникла проблема как реализовать 
 переключение языка непосредственно при выполнении так как в среде 
 разработке при изменении
пункта Language с default на Dutch все надписи на 
 форме меняються а вот при выполненни незнаю как сделать
 добавил сл код непомог:
 System.Threading.Thread.CurrentThread.CurrentUICulture = New 
 System.Globalization.CultureInfo(тут вписывал код языка (1049)(1033) и 
 т.д.)
 Помогите Плиз !!
 Если вы знаете как можно по другому реализовать многоязычность сообщите...
 Зарание Вам блгадарен!!

Отвечает: EROS // 21.07.2007 / 21:26

Здравствуйте, weltkind!
 Ваш код, в принципе, верный. Но вы должны понимать как ЭТО работает.
 Дело в том, что локализованные надписи на кнопках, надписях и т.д. загружаются в
 процедуре InitializeComponent.. Отсюда можно сделать вывод, что если Вы
 установите локаль ДО инициализации
компонентов (например в
 конструкторе формы Sub New), то у Вас все заработает...
 Если же вы хотите менять надписи в режиме Run-Time, то это делается
 примерно так...
 
     '// EROS (VB 2005,ChangeUICulture Example)
     '// 
     '// Устанавливаем нужную локаль
     My.Application.ChangeUICulture("en-US") '// Англ. локаль
     '// Получаем менеджера русурсов для этой локали
     Dim resources As ComponentResourceManager = New ComponentResourceManager(Me.GetType)
     '// Перебираем все контролы на форме и меняем надписи
     For Each item As Control In Controls
       resources.ApplyResources(item, item.Name)
     Next
     '// Это на тот случай если текст заголовка тоже локализованный
     resources.ApplyResources(Me, "$this")
     '// Наслаждаемся результатом
 
 -- 
 С уважением,
 EROS

Вопрос #000380: Visible and FOR

Автор вопроса: Taras // 21.07.2007 / 06:23

Здраствуйте!
 У меня такой вопросик 
 создал я форму на ней розместил 4 текстовых поля (1 для ввода количиства видимых текстовых полей, видимый)
 3 невидимых тексттовых поля (невидимы)
 кнопку которой присвоил следущее значение
 Dim i As Integer
 Dim n As Integer
 n = text1.text
 For i=0 to n
 text(n).visible = true
 next
 
 после того как мы задади текстовому полю 1 значение и нажмем на кнопку
 в зависимости от заданого числа станут видимыми н-ное количиство текстовых форм
 но после нажатия на клавишу проесходить ошибка...
 Где моя ошибка?
 
 --------------------------------------
 Категория: --- Visual Basic 5.0/6.0
 
 

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

Здравствуйте, Тарас!
 
 Специально для вас накатал небольшой, но интересный пример :)
 
 Создайте стандартный EXE-проект и просто вставьте ниже следующий код:
 001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
016:
017:
018:
019:
020:
021:
022:
023:
024:
025:
026:
027:
028:
029:
030:
031:
032:
033:
034:
035:
036:
037:
038:
039:
040:
041:
042:
043:
044:
045:
046:
047:
048:
049:
050:
051:
052:
053:
054:
055:
056:
057:
058:
059:
060:
061:
062:
063:
064:
065:
066:
067:
068:
069:
070:
071:
072:
073:
074:
075:
076:
077:
078:
079:
Option Explicit
'Пример динамического создания контролов VB 6.0
'Автор
примера: Немиро Алексей, 21 июля 2007 года
'Специально для проекта Kbyte.Ru (http://kbyte.ru)
'Copyright (c) Nemiro AS, 2007
'mailto:admin@kbyte.ru

'регистрируем обработчик событий для кнопки - cmdRefresh
Private WithEvents cmdRefresh As CommandButton

Private
Sub Form_Load()
 'подгоняем размер формы
 Form1.Width = 6000
 Form1.Height = 4000

 'добавляем надпись - Label
 Form1.Controls.Add "VB.Label", "Label1"
 With Form1!Label1
  .Top = 120
  .Left = 120
  .AutoSize = True
  .Caption = "Введите число:"
  .Visible = True
 End With

 'Добавляем текстовое
поля для ввода чисел
 Form1.Controls.Add "VB.TextBox", "txtNum"
 With Form1!txtNum
  .Top = 120
  .Left = Form1!Label1.Width + Form1!Label1.Left + 120
  .Height = 300
  .Width
= 500
  .Text = 0
  .Visible = True
 End With

 'Добавляем кнопку
 Set cmdRefresh = Controls.Add("VB.CommandButton", "cmdRefresh")
 With Form1!cmdRefresh
  .Top = 120
  .Left = Form1!txtNum.Width + Form1!txtNum.Left + 120
  .Height = 320
  .Width = 1200
  .Caption = "Обновить"
  .Visible = True
 End With
  
End Sub

'Обработчик нажатия динамической кнопки
Private Sub cmdRefresh_Click()
 Dim i As Long
 If Not IsNumeric(Form1!txtNum.Text) Then MsgBox "Допускаются только числа!", vbExclamation: Exit Sub

 'удаляем все контролы с именем txtArr
g:
 For i = 0 To
Form1.Controls.Count - 1
  If Left(Form1.Controls(i).Name, 6) = "txtArr" Then
  Form1.Controls.Remove Form1.Controls(i).Name
  GoTo g
  End If
 Next i

 'Добавляем
указанное количество текстовых полей
 For i = 0 To CLng(Form1!txtNum.Text)
  Dim sName As String
  sName = "txtArr" & i
  Form1.Controls.Add "VB.TextBox", sName
  With Form1.Controls(Form1.Controls.Count - 1)
   .Top = Form1.Controls(Form1.Controls.Count - 2).Height + Form1.Controls(Form1.Controls.Count - 2).Top + 20
   .Left = 120
   .Height = 300
   .Width = 1200
   .Text = "поле " & i
   .Visible = True
  End With
 Next i

End Sub

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

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

Dim i As Integer
 Dim n As Integer
 n = text1.text
 For i=0 to n
 text(n).visible = true
 next

 
 Если text - это массив текстовых полей, то n должен быть равен UBound(text) -
1
 Для работы с массивами элементов управления, также можно использовать операторы Load и Unload:
 001:
002:
003:
Load Text(UBound(Text))
Text(UBound(Text) - 1).Text = "заходи на http://kbyte.ru!"
Text(UBound(Text) - 1).Visible = True

 или
 001:
002:
003:
004:
005:
If UBound(Text) > 1 Then
For i = 1 To UBound(Text)
 Unload Text(i)
Next
i
End If

 или
 001:
002:
003:
004:
005:
006:
007:
Dim i As Long
For i = 0 To 100
 Load Text(UBound(Text))
 Text(UBound(Text) - 1).Text = "текстовое поле #" & i
 Text(UBound(Text) - 1).Left = Text(UBound(Text) - 2).Left + Text(UBound(Text) - 1).Width + 20
 Text(UBound(Text) - 1).Visible = True
Next i

 и т.д. и т.п.
 
 -- 
 С наилучшими пожеланиями,

 Немиро Алексей

Вопрос #000379: Ссылка в ВБ 6.0

Автор вопроса: Тарас // 21.07.2007 / 06:23

Здраствуйте :)
 
 Вопрос:
 Как добавить ссылку на Microsoft Excel
 6/7/8/9.0 (или любую другую версию)
Object Library
 у меня VB 6.0 sp5 русская версия и при выборе в меню проект я там добовать ссылку не вижу :(
 Если вас незатруднит пожалуйста скинте мне исходник по работе с екселем пожалуйста...
 или более подробно разпишите, пожелуйста...
 С уважением Тарас!!! :)
 
 --------------------------------------
 Категория: --- Visual Basic 5.0/6.0
 
 

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

Здравствуйте, Тарас!
 
 Меню Проект (Project) => Ссылки (Reference), появится окно "Ссылки (Reference)", установите
 флажки на библиотеки, которые вы хотите добавить в проект, и нажмите "Ok".
 
 PS: Microsoft Excel скорей всего не будет, поскольку Эксель - это
 часть офиса, так что надо искать MS Office ;)
 
 -- 
 С наилучшими пожеланиями, 
 Немиро Алексей

Вопрос #000376: Открыть окно браузера с результатами поиска

Автор вопроса: Федоренко Дмитрий Константинович // 19.07.2007 / 06:36

Здравствуйте.
 
 Ранее через вашу систему был получен ответ, как можно заносить в форму в текстовое поле одной программы значение из формы текстового поля другой программы.
 При этом используются следующие функции для определения дескрипторов окна-формы и нужных элементов на нем:
 
 h = FindWindow(vbNullString, ByVal "ИМЯ_ФОРМЫ") 
 hText = FindWindowEx(h, 0, vbNullString, ByVal "ИМЯ_ТЕКСТОВОГО_ЭЛЕМЕНТА") 
 или
 hwnd1
= WindowFromPoint(cursorpos1.x, cursorpos1.y)
 
 Ответ на данный вопрос был успешно дан экспертами вашей системы с помощью демонстративной программы UltraSpy с используемыми в ней данными функциями, которую можно скачать с вашего сайта по ссылке http://kbyte.ru/Samples/Show.aspx?id=182.
 
 Но такое решение проблемы не помогает в случае, когда речь идет об окне-форме Internet Explorer.
 
 Например в частном случае. Если пройти по ссылке www.yandex.ru и попробовать описанным выше
методом получить дескриптор элемента (поля ввода) строки поиска, то он с помощью таких функции не находится (что и понятно, так как в данном случае это уже не элемент типа текст как в VB, а часть разметки HTML).
 
 Как же поступить в данном случае, при условии, что мы не можем открыть страничку в виде HTML кода и посмотреть имя этой переменной (строки ввода текста)?
 
 
 Заранее благодарю, Дмитрий.

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

Здравствуйте, Дмитрий!
 
 В случае с Яндекс (и любой другой поисковой системой), если Вы хотите,
 чтобы Ваша программа открыла страницу с результатами поиска, то все
 довольно просто:
 
 001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
Option Explicit
Private Declare Function ShellExecute Lib "shell32" _
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

Private Const SW_SHOWNORMAL = 1

Private
Sub Form_Load()
 ShellExecute 0, vbNullString, _
 "http://www.yandex.ru/yandsearch?stype=&nl=0&text=Kbyte.Ru", vbNullString, _
 vbNullString, SW_SHOWNORMAL
End Sub

 
 В данном примере программа откроет страницу Яндекс с результатами
 поиска слова Kbyte.Ru. Получить такой url можно на самом
Яндекс, введя
 в строку поиска слово поиска, и нажав на кнопку «Найти». В указанном
 выше примере, достаточно просто поменять значение параметра text в url.
 
 Данный способ можно применять только для GET-запросов.
 
 -- 
 С наилучшими пожеланиями, 
 Немиро Алексей

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

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

Наверх

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

Почтовый клиент | Автор: Алексей
Добавлено: 25.07.2007 / 12:28 | ответов: 18 | просмотров: 107

Пользуетесь ли вы почтовыми клиентами, если да, то какими?

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

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

Ответ # 1 | Автор: LeX
Добавлено:25.07.2007 / 14:09
Я пробовал аутглюком но потом перестал, т.к. он глючит и не дружит с avast'ом :)

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

Ответ # 2 | Автор: Berd
Добавлено:25.07.2007 / 14:17
Я так понял здесь он скоро будет - почтовый клиент?
Мне проще, я ведь живу на переулке Почтовом :)

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

Ответ # 3 | Автор: Алексей
Добавлено:25.07.2007 / 14:32
Я пробовал аутглюком но потом перестал, т.к. он глючит и не дружит с avast'ом

а если не секрет, что конкретно тебя не устроило в аутглюке? Ведь он довольно простой..
И что значит не дружит с avast-ом? Он его, что бьет, пинает, кусает,
игрушки отбирает :))

Я так понял здесь он скоро будет - почтовый клиент?

Нет :) просто я хочу понять, почему некоторые люди не используют почтовые клиенты :)

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

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

Ответ # 4 | Автор: LeX
Добавлено:25.07.2007 / 15:17
Он не работает когда включен аваст и почему-то не принимает письма :)

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

Ответ # 5 | Автор: Алексей
Добавлено:25.07.2007 / 15:29
Он не работает когда включен аваст и почему-то не принимает письма

просто надо было его настроить ;)

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

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

Ответ # 6 | Автор: EROS
Добавлено:25.07.2007 / 19:45
я хочу понять, почему некоторые люди не используют почтовые клиенты :)

ответ до банального прост.. недостаточно навыков дя настройки клиента...
лично я предпочитаю обычный аутлук..

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

Ответ # 7 | Автор: Алексей
Добавлено:26.07.2007 / 02:36
ответ до банального прост.. недостаточно навыков дя настройки клиента...

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

лично я предпочитаю обычный аутлук..

я уже давно юзаю The Bat, он у меня просто висит в трее и проверяет
почту, сортирует, иногда издает разные звуки, в зависимости от типа
пришедшего сообщения :) Удобно, да и с базами данных проблем нет,
помню у меня в аутлуке как-то база поломалась, а в the bat ниразу
такого не было. Сейчас у меня в базе всего 61 423 писем :)

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

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

Ответ # 8 | Автор: LeX
Добавлено:26.07.2007 / 08:44
а в the bat ниразу такого не было

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

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

Ответ # 9 | Автор: Алексей
Добавлено:26.07.2007 / 08:54
Смотри не сглазь :)

пф, пф, пф в левый угол монитора +три раза головой об стол :)

Мы с Саней пытались настроить аутглюк. Отправлять письма он отправляет, но не принимает :)

Прием писем обычно идет по протоколу pop3 :) Например, у yandex.ru -
адрес сервак pop.yandex.ru, порт дефолтный - 110. В далекие
времена на Compaworld я даже
писал статейку на эту тему, как раз про яндекс и аутглюк. Вообще, все
халявные и не только, почтовые серваки предоставляют подробную справку
с кратинками по настройке популярных почтовиков.

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

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

Ответ # 10 | Автор: Bille Gates
Добавлено:26.07.2007 / 11:56
Мы с Саней пытались настроить аутглюк. Отправлять письма он отправляет, но не принимает :)

1-не ссылайся на людей без письменного разрешения подписанного 10 гос. инстанциями и письменного разрешения автора отксеренного 100 раз и спрятанного по разным углам :)
2-Мы не пытались... я тебе настроил, и первое время он принимал письма... мы с тобой проверяли, а потом ты говорил о такой проблеме, но исправить её мы не пытались... т.е. не ври людям!

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

Ответ # 11 | Автор: LeX
Добавлено:26.07.2007 / 12:03
2-Мы не пытались... я тебе настроил, и первое время он принимал письма... мы с тобой проверяли, а потом ты говорил о такой проблеме, но исправить её мы не пытались... т.е. не ври людям!

Кто там проверял? Это ты не ври. Он не принял ни одного письма.

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

Ответ # 12 | Автор: Bille Gates
Добавлено:26.07.2007 / 12:10
ну предположим что то тестовое письмо которое я отправлял тебе, не пришло к тебе, я то об этом не знаю... ферштеин?

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

Ответ # 13 | Автор: Bille Gates
Добавлено:26.07.2007 / 12:11
я допустим использую outlook express и все нормально работает... полазь сам в настройках... если тебе так не хочется чтобы я пришел и настроил...

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

Ответ # 14 | Автор: LeX
Добавлено:26.07.2007 / 12:55
если тебе так не хочется чтобы я пришел и настроил...

Почему не хочется :) Я просто уже привык без него жить :)

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

Ответ # 15 | Автор: Алексей
Добавлено:26.07.2007 / 13:06
если тебе так не хочется чтобы я пришел и настроил...

а кто хочет, чтобы я пришел и настроил? :)

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

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

Ответ # 16 | Автор: LeX
Добавлено:26.07.2007 / 15:01
а кто хочет, чтобы я пришел и настроил? :)

Приходи, может до следующего лета дойдешь :)

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

Ответ # 17 | Автор: Алексей
Добавлено:26.07.2007 / 15:16
Приходи, может до следующего лета дойдешь :)

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

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

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

Ответ # 18 | Автор: LeX
Добавлено:27.07.2007 / 10:13
придется тебе высылать мне трех колесный велосипед, и
лыжи :)

Трехколесного нет :) Я на нем так и не научился кататься, поэтому есть только четырех колесный :D (шутка юмора)))

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

Не судите строго! Конструктивная критика приветствуется! | Автор: Игорь Голов
Добавлено: 25.07.2007 / 00:15 | ответов: 2 | просмотров: 17

Пробую сделать свой сайт:
http://it-shark.3dn.ru

Хочу узнать как можно больше мнений о содержимом сайта.
Советы ещё никому и никогда не вредили, не так ли? :)

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

Ответ # 1 | Автор: Алексей
Добавлено:25.07.2007 / 04:51
Дизайн у UcoZ-а как всегда нормальньй :)
http://it-shark.3dn.ru/index/0-4 - эта страничка у меня не помещается по ширине, видимо что-то с html-ом не так. (1024x768)
http://it-shark.3dn.ru/dir/ - хорошо :)

В общем сказать не чего, поскольку содержимого сайта как такогового пока нет. Если судить по заголовку "Жизнь и Творчество Маленького Человека", могу порекомендовать завести блог, с ним меньше хлопот будет.

зы: я ярый противник использования готовых движков :)

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

Ответ # 2 | Автор: EROS
Добавлено:25.07.2007 / 08:37
я ярый противник использования готовых движков

присоеденяюсь..
Более того, если я вижу что это шаблон.. (phpBB,UcoZ и прочая фигня) - закрываю не читая.. Так что сорри, контент (если таковой имеется) даже не смотрел..

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

Как правильно вызвать форму из DLL | Автор: Игорь Голов
Добавлено: 24.07.2007 / 20:36 | ответов: 4 | просмотров: 27

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

Спасибо!

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

Ответ # 1 | Автор: EROS
Добавлено:24.07.2007 / 21:11
А в чем, собственно, проблема? Объявляешь переменную с ключевым словом WithEvents и нужным типом,создаешь объект (твоя форма).. и обрабатывай любые события.. Граблей тут в принципе не может быть!

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

Ответ # 2 | Автор: Игорь Голов
Добавлено:25.07.2007 / 17:37
Если можно приведите, пожайлуста, примерчик.
Огромное спасибо!

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

Ответ # 3 | Автор: EROS
Добавлено:25.07.2007 / 22:26
Набросал простенький пример.. В примере реализовал "фирменную" форму kbyte.ru :-) и эффект плавного появления,чтоб наглядней было..
По примеру ты сможешь понять следующие моменты:
- Наследование формы
- Вызов формы из dll
- Реализация и передача событий
- Преобразование Image из ресурсов в Icon программно
- Создание и использование своего UserControl'a
- ну и еще кое что по мелочи...

P.S. Тестовый проект прикреплен с сообщению...

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

Ответ # 4 | Автор: Игорь Голов
Добавлено:26.07.2007 / 01:02
Спасибо! Немаленькое! :)

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

Программа или специальный скрипт к сайту... | Автор: Kolya007
Добавлено: 24.07.2007 / 03:03 | ответов: 7 | просмотров: 50

Возможно ли создать программу, а лучше специальный скрипт (файл), который независимо от пользователей(есть они или нет) проверял БД один раз в неделю, и при необходимости создавал файл по образцу, с некоторыми изменениями...
Файл образец news_s.txt... Создаваемые файлы news_s1.asp(есть, сделан вручную), news_s2.asp(нет), news_s3.asp(нет), news_s№.asp... № - id раздела получаемый из БД... Изменения должны будут касаться того, что нлишь SQL запроса в конечных файлах, а именно будет меняться содержимое "" в WHERE news_section=""

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

Ответ # 1 | Автор: Алексей
Добавлено:24.07.2007 / 03:40
Нормальный хостер должен предоставлять что-нибудь типа Crontab (планировщик задач), который позволяет запускать любые странички на сайте, с любыми параметрами, в любое время, или через определенный интервал времени.

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

Ответ # 2 | Автор: Kolya007
Добавлено:24.07.2007 / 09:08
Понятно...))
А как сделать, чтобы программа(скрипт) при необходимости создавала файл по образцу, с некоторыми изменениями?..

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

Ответ # 3 | Автор: EROS
Добавлено:24.07.2007 / 21:31
А как сделать, чтобы программа(скрипт) при необходимости создавала файл по образцу, с некоторыми изменениями?..

Налицо явное непониманимание принципов и понятий Web-технологии.. Позволю себе прокомментировать слова Алексея..

который позволяет запускать любые странички на сайте
Суть сказанного заключается в следующем:
К примеру, у тебя имеется страница job.aspx, и Cron-сервис хостера запускает ее, скажем, раз в сутки.. Страница состоит из 2 частей.. 1. Html-код(которого у тебя может и не быть) и 2. файл кода.. так называемый CodeBehind, это по сути обычный класс(знакомый тебе по WinForms)..Этот класс так же обладает событиями Init,Load и т.д... Так вот, в любои из подходящих событии страницы ты (как обычно) открываешь файл , вносишь изменения и сохраняешь под нужным тебе именем.. вот и все!
Граблей, на которые ты можешь наступить, навскидку я вижу двое.. 1. Это получения абсолютного физического пути к файл находящемуся на сервере.. это легко решается через Server.MapPath и 2. Судя по твоему посту ты собираешься создавать asp файлы.. Так вот налицо явная проблема с архитектурой.. так никто не делает! Страница для отображения новостей должна быть всего одна! Тебе необходимо в строке запроса передать параметр этой страницы.. например news.asp?section=1234 Далее при загрузке страницы ты получаешь номер секции (или что у тебя там).. в нашем случае это 1234 и показываешь пользователю нужную секцию,которую ты через сформированный запрос будешь получать из БД.. вот и все!

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

Ответ # 4 | Автор: Kolya007
Добавлено:24.07.2007 / 21:49
EROS, тот вариант провалился... Т.к. без теста, я страницу готовой несчитаю... А при тесте на моем ПК он высвечивал ошибки, которых в помине быть немогло... См. предыдущие темы "Вопрос по RecordSet", если я правельно помню название...))
По поводу

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

Налицо явное непониманимание принципов и понятий Web-технологии.. Позволю себе прокомментировать слова Алексея..

Я имел ввиду пример кода, на всякий случай...))

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

Ответ # 5 | Автор: Алексей
Добавлено:25.07.2007 / 05:01
Добавить в избранное | Рассказать другу | Ответить
EROS, тот вариант провалился... Т.к. без теста, я страницу готовой несчитаю... А при тесте на моем ПК он высвечивал ошибки, которых в помине быть немогло...

если ты не можешь настроить нормально IIS, то тестируй на сервере ;)

Я имел ввиду пример кода, на всякий случай...))

попробуй поюзать CreateObject("Scripting.FileSystemObject"), или стандартные VB-функции (см. справочники), если конечно они работают в ASP. Но как сказал EROS, это довольно кривой вариант.

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

Ответ # 6 | Автор: Kolya007
Добавлено:25.07.2007 / 15:01
если ты не можешь настроить нормально IIS, то тестируй на сервере ;)

IIS настроен по умолчанию...))

попробуй поюзать CreateObject("Scripting.FileSystemObject"), или стандартные VB-функции (см. справочники), если конечно они работают в ASP. Но как сказал EROS, это довольно кривой вариант.

Я знаю, но что поделать...))

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

Ответ # 7 | Автор: Алексей
Добавлено:26.07.2007 / 04:39
IIS настроен по умолчанию...))

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

Я знаю, но что поделать...))

Клонирование в нашей стране запрещено, особенно asp-файлов ;)

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

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

iframe | Автор: Kolya007
Добавлено: 21.07.2007 / 04:22 | ответов: 15 | просмотров: 148

На странице есть iframe, использую его, т.к. include несрабатывает с ASP страницами...
Вопрос: Возможно ли сделать так чтобы iframe при необходимости увеличивался, т.е. менял значение height... Запись height="*" и height="100%" неподходит...
Или дайте совет по include, что будет лучше...

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

Ответ # 1 | Автор: Алексей
Добавлено:21.07.2007 / 06:20
На странице есть iframe, использую его, т.к. include несрабатывает с ASP страницами...

моя твоя не понимать :)

Вопрос: Возможно ли сделать так чтобы iframe при необходимости увеличивался, т.е. менял значение height... Запись height="*" и height="100%" неподходит...

хз, юзай JavaScript тогда..

зы: iframe - das nicht gut

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

Ответ # 2 | Автор: Kolya007
Добавлено:21.07.2007 / 12:35
моя твоя не понимать :)

Вместо

001:


испльзую

001:
<iframe name="news" frameborder="no" height="100%" width="100%" align="top" marginheight="0" marginwidth="0" scrolling="no" src="sections/news_s1.asp"></iframe>

т.к.

001:


несрабатывает из-за .asp, будь он .htm или .html, то все бы работало...

хз, юзай JavaScript тогда..

зы: iframe - das nicht gut

Мне надо, чтобы он вместо выдавания скрола(scrolling), менял значение height на необходимый...

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

Ответ # 3 | Автор: Алексей
Добавлено:21.07.2007 / 13:02
Вместо

001:


испльзую

001:
<iframe name="news" frameborder="no" height="100%" width="100%" align="top" marginheight="0" marginwidth="0" scrolling="no" src="sections/news_s1.asp"></iframe>

т.к.

001:


несрабатывает из-за .asp, будь он .htm или .html, то все бы работало...

А что мешает юзать обычный инклуд?

001:


зы: FrontPage - das nicht Gut.

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

Ответ # 4 | Автор: Kolya007
Добавлено:21.07.2007 / 13:30
А что мешает юзать обычный инклуд?

То же, что и

001:


Он несрабатывает...

зы: FrontPage - das nicht Gut.

Его я использую, толька для упрощения работы с сайтом... Просто все команды и операторы нельзя запомнить сразу...))

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

Ответ # 5 | Автор: Алексей
Добавлено:21.07.2007 / 13:38
Он несрабатывает...

вероятно проблема в сервере, хотя по умолчанию в IIS все должно работать.

Его я использую, толька для упрощения работы с сайтом... Просто все команды и операторы нельзя запомнить сразу...))

Какой-нибудь Macromedia Dreamweaver по-моему гораздо лучше.

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

Ответ # 6 | Автор: Kolya007
Добавлено:21.07.2007 / 13:46
Какой-нибудь Macromedia Dreamweaver по-моему гораздо лучше.

Знаю, но его у меня нет... А искать нет желания...

вероятно проблема в сервере, хотя по умолчанию в IIS все должно работать.

Скорее всего, ведь ОС пиратская...

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

Ответ # 7 | Автор: Алексей
Добавлено:21.07.2007 / 14:00
Скорее всего, ведь ОС пиратская...

Это тут явно не причем :)

В чем именно выражает не работоспособность include?

Инклуды бывают разные:
 - виртуальный путь к файлу
 - физический путь к файлу

код тоже можешь показать, может там чего не так...

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

Ответ # 8 | Автор: Kolya007
Добавлено:22.07.2007 / 04:07
Инклуды бывают разные:
 - виртуальный путь к файлу
 - физический путь к файлу

Я пробовал оба... Но результат нулевой... Он его словно пропускает...

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

Ответ # 9 | Автор: Алексей
Добавлено:22.07.2007 / 04:11
С file полюбому должен работать...
Во включаемоме asp-файле asp-код должен быть записан в тэгах <%%>.
Еще попробуй изменить расширение файла на .inc.

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

Ответ # 10 | Автор: Kolya007
Добавлено:22.07.2007 / 16:19
Еще попробуй изменить расширение файла на .inc.

Так вставляет, но только фон... А точнее говоря меняет имеющийся фон, на фон вставляемой страницы...

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

Ответ # 11 | Автор: Алексей
Добавлено:23.07.2007 / 03:45
Так вставляет, но только фон... А точнее говоря меняет имеющийся фон, на фон вставляемой страницы...

код в студию! (фрагмент +/- 10 строк от инклуда, и содержимое самого включаемого файла)
Если он меняет фон, значит ты его заставил это сделать :)

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

Ответ # 12 | Автор: Kolya007
Добавлено:23.07.2007 / 14:19
001:
002:
003:
004:





Все 4 варианта меняют имеющийся фон, на фон вставляемой страницы...

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:
<%
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_sections"
RS.Open strSQL, Conn
%>
<html>
<head>
<title></title>
<link href="section.css" rel="stylesheet" type="text/css">
</head>
<body>

<%
If RS.EOF = true Or RS.BOF = true Then
Response.Write("<br>База данных пуста<br>")
Else
Do While Not RS.EOF
If RS.EOF = true Or RS.BOF = true Then Exit Do
Response.Write("<table width='190' align='center' border='0' class='l_n'>" & _
"<tr><td align='center' colspan='2' class='l_n'>" & _
"<img align='middle' height='10' width='190' src='./info/img/last_news/fon_table_top.jpg'></td></tr>" &_
"<tr><td><p align='center'>" & _
"<a href='sections/news_s" & RS.Fields("id_section") & ".asp' target='news'>" & RS.Fields("section") & _
"</a></p></td></tr>" & _
"<tr><td align='center' colspan='2' class='l_n'>" & _
"<img align='middle' height='10' width='190' src='./info/img/last_news/fon_table_bottom.jpg'>" & _
"</td></tr></table>")
RS.MoveNext
Loop
End If
%>
</body>
</html>
<%
RS.Close
Conn.Close
%>

Это вставляемая страница...
------------------------------------
А это в которую вставляю(вариант с iframe вместо include)

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:
<html>
<head>
<title></title>
<link href="news.css" rel="stylesheet" type="text/css">
</head>
<body>
<table border="0" height="100%" width="100%">
<tr>
<td height="20%" width="*" align="center" valign="center" colspan="2">
<img align="middle" height="150" width="550" src="./info/logo/logo_text.gif" border="0">
</td>
</tr>
<tr>
<td height="*" width="20%" align="center" rowspan="2" valign="top">

<iframe frameborder="no" height="100%" width="200" align="top" marginheight="0" marginwidth="0" scrolling="no" src="section.asp">
</iframe>
</td>
<td height="5%" align="center" valign="center" width="*">


<table align="center" border="0" height="100%" width="100%">
<tr>
<td valign="top">
<a href="./index.htm"><img align="middle" src="./info/link/index.jpg" border="0"></a>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="*" width="*" align="center" valign="top">

<iframe name="news" frameborder="no" height="100%" width="100%" align="top" marginheight="0" marginwidth="0" scrolling="no" src="sections/news_s1.asp">
</iframe>
</td>
</tr>
</table>
</body>
</html>

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

Ответ # 13 | Автор: Алексей
Добавлено:23.07.2007 / 14:40
Интересно, что ты хочешь увидеть в результате, если вставляемая страница у тебя "полноценная", т.е. имеет тэги <html>, <body> и даже stylesheet :) посмотри html, который выведет подобный вариант ;)

Инклуды должны содержать только те данные, которых нет на странице, в которую они вставляются. Инклуды будут продолжением страницы, в которую вставляются.

Например:

default.asp

001:
002:
003:
004:
005:
006:
<html>
<head>
<title> </title>
<link href="home.css" rel="stylesheet" type="text/css">
</head>
<body>

include/title.inc

001:
Просто текст

Результат будет таким:

001:
002:
003:
004:
005:
006:
<html>
<head>
<title>Просто текст</title>
<link href="home.css" rel="stylesheet" type="text/css">
</head>
<body>

В общем, что содержит включаемый файл, то и будет вставлено один к одному в конечную страницу.

По фреймам, есть такая штука, фрамесит называется:

001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
<frameset rows="24,*,110" cols="776*" frameborder="no" border="0" framespacing="0" scroll="no">
  <frame src="top_menu.asp">
  <frameset rows="*" cols="*,200" framespacing="0" frameborder="NO" border="0">
    <frame src="main.asp" name="shmsg">
    <frame src="userlist.asp" name="rightFrame" scrolling="NO" noresize>
  </frameset>
  <frame src="add.asp" name="sendmsg" scrolling="NO" noresize >
</frameset>

Кусок майн пейджа asp-чата

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

Ответ # 14 | Автор: Алексей
Добавлено:23.07.2007 / 14:45
ps: атрибут virtual обычно под IIS не используют, скорей всего он даже не работает (покрайней мере в ранних версиях iis не работал), надо юзать file.

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

Ответ # 15 | Автор: Kolya007
Добавлено:24.07.2007 / 00:54
Все ок... Спасибо...))

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

Наверх

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

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

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

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

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

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

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

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

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

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

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

Статьи на Kbyte.Ru

Наверх

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

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

Как преобразовать байты в килобайты?
Дата добавления: 31.07.2006 / 12:38 | просмотров: 499 | платформа: VB

Как определить текущую раскладку клавиатуры?
Дата добавления: 16.08.2006 / 19:38 | просмотров: 456 | платформа: VB

Анализ URL
Дата добавления: 24.03.2007 / 10:52 | просмотров: 108 | платформа: RegEx

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

Как установить фокус на определенный элемент?
Дата добавления: 31.07.2006 / 16:55 | просмотров: 550 | платформа: ASP .NET (VB)

Запись данных в файл
Дата добавления: 31.07.2006 / 17:20 | просмотров: 456 | платформа: ASP .NET (VB)

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

Как получить параметры командной строки?
Дата добавления: 04.08.2006 / 09:20 | просмотров: 652 | платформа: VB

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

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

Наверх

Юмор на Kbyte.Ru

- Что ты пишешь? - спросили программиста.
- Сейчас запустим - узнаем! - ответил программист.

Рейтинг: 32
Всего голосов: 58