я только начел изучать вижал бейсик.. поможете кое чем?

[ArSOAD]

смотрите! мне нужна аткая тема:

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

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

[dr.MIG]

Что бы сайт не вбивали в адресной строке, а запускали с рабочего стола VB знать не обязательно: "Создать" -> "Ярлык" и в текстовом поле указать URL (http://tvoy.site.ru). А так вопрос не ясен: что именно надо -- запустить IE с определённым адресом или запустить программу, содержащую ЭУ WebBrowser, или просто вывести на форму какую-то информацию с сайта?

[ArSOAD]

смотри...

перед тобой рабочий стол. на нём ярлык. он(а) нажимает на него и заходят на мой сайт через бейсик

[Sebas]

он(а) нажимает на него и заходят на мой сайт через бейсик

в мемориз!

[ArSOAD]

эмм.. не понел =( можете кинуть то, что нуэно там вписать... ?

[dr.MIG]

Определенно, в цитаты...
Хорошо, объясни тогда необходимость захода на сайт именно через твой клиент. Можно, как я уже сказал, создать обычный ярлык. Будет всё как ты хочешь: перед тобой рабочий стол, на нём ярлык, он (она) нажимает на него и переходит на твой сайт через дефолтный браузер.

[ArSOAD]

да вот именно так хочу, но хочу чтобы никаких ярлыков в браузере IE,Opera и др. чтоб этих ярлыков не было

[Хакер]

ArSOAD
Ты противоречишь сам себе:

перед тобой рабочий стол. на нём ярлык. он(а) нажимает на него и заходят на мой сайт через бейсик

да вот именно так хочу, но хочу чтобы никаких ярлыков в браузере IE,Opera и др. чтоб этих ярлыков не было

Есть предположение, что ты нифига не понял, что тебе написал dr.MIG. Но разве в этом случае сложно проделать вышеописанные действия (с пунктом меню "Создать ярлык"?)

[ArSOAD]

мля вощем тема такая:

http://vidoz.3dn.ru/1112121212.JPG

чтобы так было

[dr.MIG]

Добавь на форму элемент управления WebBrowser.
В коде загрузки формы напиши WebBrowser1.Navigate "http://tvoy.site.ru".

[Хакер]

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

[ArSOAD]

Dr Mig

извени что я такой тупой но я вбил это и не получается.. вот всё, что было у меня :

Private Sub Form_Load(WebBrowser1.Navigate "http://s-o-a-d.info")

End Sub

[Хакер]

Не в аргумент процедуры обработки события, а в её тело.

Т.е.

Код: Выделить всё

Private Sub Form_Load()
WebBrowser1.Navigate "http://s-o-a-d.info"
End Sub

[Wolfie]

ArSOAD, теперь осталось только растянуть по форме этот WB при ресайзе и знакомство с VB можно считать оконченным с успехом
Для этого тебе, нужно вставить в форму код

Код: Выделить всё

Private Sub Form_Resize()
WebBrowser1.Move 0, 0, Me.ScaleWidth, Me.ScaleHeight 'Растянем Окно Браузера по всей форме
End Sub

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

[ArSOAD]

почему-то нельзя =(( желтым цветом выделяет: WebBrowser1.Navigate "http://s-o-a-d.info"

=((

[Хакер]

ArSOAD
Т.е. для тебя, то что "желтым цветом выделяет" - первостепенно, а то, что при этом ещё и какое-то сообщение выводится - мелочь, настолько незначительная, что о ней можно даже не говорить?

Как бы счастлив был я, если бы я мог понять логику людей, которые кричат "У меня ошибка! У меня ошибка!", но при этом до последнего не хотят говорить, какая именно ошибка у них там произошла.

[ArSOAD]

пишет RUN-TIME ERROR 424 =((

[Хакер]

Нет, ну что-за люди. Нет бы написать полностью, так, как там действительно написано, включая фразу, содержающую весь смысл ошибки ("Object required"), так он пишет 424, по которому только лишь некоторые люди способны восстановить текст ошибки.

Так вот, ArSOAD, а не забыл ли ты добавить на форму сам контрол? И, если не забыл, действительно ли он у тебя называется WebBrowser1?

[Wolfie]

ArSOAD тебе нужно подключить к проекту компонент (Right-Click по инструментам > Components) под названием Microsoft Internet Controls, если он выдаст ошибку при подключении, то нажми Browse (в том же окне выбора компонентов) и укажи напрямую путь к c:\windows\System32\shdocvw.dll - иногда помогает, а ну да, чтобы все работало, "нарисуй" его на форме и дай ему имя WebBrowser1 (лучше конечно поинформативнее, но чтоб приведенные тебе коды работали хватит и WebBrowser1)

[ArSOAD]

народ.. кому не сложно.. можете мне полностью текст скинуть сюда? плз... я вам помогу с сайтом (HTML)

[Александр Дмитриев]

Вот весь текст:

Код: Выделить всё

Private Sub Form_Load()
WebBrowser1.Navigate "http://s-o-a-d.info"
End Sub

Код: Выделить всё

Private Sub Form_Resize()
WebBrowser1.Move 0, 0, Me.ScaleWidth, Me.ScaleHeight 'Растянем Окно Браузера по всей форме
End Sub

Чтобы он заработал, сделай то, что сказал Wolfie в своём последнем на момент написания этого поста посте.

[ArSOAD]

ошибку выдает =(( Object required

[Александр Дмитриев]

Ты сделал то, что сказал Wolfie в своём последнем на момент написания этого поста посте?

[ArSOAD]

а где Bowse? извените что так туплю, прост впервый раз работаю

[Хакер]

Ctrl+T --> Alt+B
(надеюсь IDE не деструктивно руссифицирована)

[Atoman]

Сырцы WebBrowser'а

[ArSOAD]

народ.. плз.. кому не жалко 5 минут.. можете сделать такой клиент плз? буду очень благодарен

[Хакер]

ArSOAD
Чел, теюе сделали такой клиент постом выше. Если даже этого тебе недостаточно, то уж извини.

[Atoman]

ArSOAD
Странный ты какой то, тебе всё разжевали в рот положили, а теперь ещё и проглотить надо?

----------------------------------------------------------

народ.. плз.. кому не жалко 5WMR киньте плз - [Хакер] :: Номер кошелька вырезан. За номером обращаться к автору поста с помощью ЛС. Во избежание "ошибок синхронизации". буду очень благодарен

[ArSOAD]

черт.. до чегож сложная шняга... ппц... не врубаюсь.. =(( скачал я.. вставлюяю к себе, и нифига =( знаю что нагло прозвучит, но можете уже готовую сделать?