Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - .NET

Страница: 1 | 2 |

 

  Вопрос: Обновление Добавлено: 29.07.09 08:50  

Автор вопроса:  ☺♣FIO♣☺
Я залил прогу на койнить сервак. А программа должна по адресу получить имя файла(версию) и загрузить если новее. И ещё какие серваки имеют прямую ссылку?

Ответить

  Ответы Всего ответов: 22  

Номер ответа: 1
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
  Web-сайт: смекаешь.рф
 Профиль | Цитата | #1 		Добавлено: 29.07.09 09:42
И ещё какие серваки имеют прямую ссылку?

Платные

Ответить

Номер ответа: 2
Автор ответа:
 ☺♣FIO♣☺



Вопросов: 35
Ответов: 160
  Профиль | Цитата | #2 Добавлено: 29.07.09 10:40
Мне нужно, чтоб моя прога обновлялась через инет, а сервак я сам найду.

Ответить

Номер ответа: 3
Автор ответа:
 Starkiller



ICQ: 123123 

Вопросов: 3
Ответов: 14
  Web-сайт: google.ru/
 Профиль | Цитата | #3 		Добавлено: 29.07.09 11:35
Создай файл info.txt к примеру. Туда напиши версию. Еси версия > версии проги то загружать proga.exe

Хостинг мона любой юзать.

Ответить

Номер ответа: 4
Автор ответа:
 ☺♣FIO♣☺



Вопросов: 35
Ответов: 160
  Профиль | Цитата | #4 Добавлено: 29.07.09 12:40
а как?

Ответить

Номер ответа: 5
Автор ответа:
 Skywalker



ICQ: 300-70-6пятьЪ 

Вопросов: 62
Ответов: 545
  Web-сайт: iSkywalker.ru
 Профиль | Цитата | #5 		Добавлено: 29.07.09 14:36
ну в общих чертах:
  1. Private Sub GetUpdate()
  2.         Dim client As New Net.WebClient
  3.         Dim currentversion, lastversion As String
  4.         Try
  5.             lastversion = client.DownloadString("http://yourfuckingsite.ru/version/last.txt")
  6.         Catch ex As Exception
  7.             client.Dispose()
  8.             MsgBox("Не удалось связаться с сервером.")
  9.             Exit Sub
  10.         End Try
  11.         client.Dispose()
  12.         Dim fi As FileVersionInfo = FileVersionInfo.GetVersionInfo("yourfuckingprogram.exe")
  13.         currentversion = fi.FileVersion
  14.         If lastversion > currentversion Then
  15.             client = New Net.WebClient
  16.             Try
  17.                 client.DownloadFile("http://yourfuckingsite.ru/distribs/" + lastversion + "/yourfuckingprogram.exe", "update.exe")
  18.             Catch ex As Exception
  19.                 MsgBox("Не удалось связаться с сервером.")
  20.                 client.Dispose()
  21.                 Exit Sub
  22.             End Try
  23.             client.Dispose()
  24.             Dim tmppath As String = IO.Path.GetTempPath + "/updater.bat"
  25.             Dim writer As New IO.StreamWriter(tmppath, False, System.Text.Encoding.GetEncoding(1251))
  26.             writer.WriteLine("cd " + IO.Path.GetDirectoryName(IO.Path.GetFullPath("yourfuckingprogram.exe")))
  27.             writer.WriteLine(":1")
  28.             writer.WriteLine("del /Q yourfuckingprogram.exe")
  29.             writer.WriteLine("if exist yourfuckingprogram.exe goto 1")
  30.             writer.WriteLine("ren update.exe yourfuckingprogram.exe")
  31.             writer.WriteLine("yourfuckingprogram.exe")
  32.             writer.Close()
  33.             writer.Dispose()
  34.             'дальше либо в событии закрытия проги пишем, либо насильно щас прогу закроем, и откроем обновленную, для этого пишем:
  35.             Dim procStartInfo As New ProcessStartInfo("cmd", "/C """ + tmppath + """")
  36.             procStartInfo.UseShellExecute = True
  37.             procStartInfo.CreateNoWindow = True
  38.             Dim proc As New Process
  39.             proc.StartInfo = procStartInfo
  40.             proc.Start()
  41.             End
  42.         End If
  43.     End Sub

Ответить

Номер ответа: 6
Автор ответа:
 ☺♣FIO♣☺



Вопросов: 35
Ответов: 160
  Профиль | Цитата | #6 Добавлено: 29.07.09 18:01
ОГРОМНОЕ СПС!!!

Ответить

Номер ответа: 7
Автор ответа:
 ☺♣FIO♣☺



Вопросов: 35
Ответов: 160
  Профиль | Цитата | #7 Добавлено: 29.07.09 18:08
А какнить можно отображать сколько % загрузки?

Ответить

Номер ответа: 8
Автор ответа:
 Skywalker



ICQ: 300-70-6пятьЪ 

Вопросов: 62
Ответов: 545
  Web-сайт: iSkywalker.ru
 Профиль | Цитата | #8 		Добавлено: 29.07.09 23:08
можно канешна, ищи сам)

Ответить

Номер ответа: 9
Автор ответа:
 Starkiller



ICQ: 123123 

Вопросов: 3
Ответов: 14
  Web-сайт: google.ru/
 Профиль | Цитата | #9 		Добавлено: 30.07.09 10:37
Dim tmppath As String = IO.Path.GetTempPath + "/updater.bat"

Мда. А зачем батники? 0_^

Ответить

Номер ответа: 10
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
  Web-сайт: смекаешь.рф
 Профиль | Цитата | #10 		Добавлено: 30.07.09 11:25
Ща это модно))

Ответить

Номер ответа: 11
Автор ответа:
 ☺♣FIO♣☺



Вопросов: 35
Ответов: 160
  Профиль | Цитата | #11 Добавлено: 30.07.09 13:33
у батников основные возможности - работа с файлами и общение с юзером...

Ответить

Номер ответа: 12
Автор ответа:
 Skywalker



ICQ: 300-70-6пятьЪ 

Вопросов: 62
Ответов: 545
  Web-сайт: iSkywalker.ru
 Профиль | Цитата | #12 		Добавлено: 30.07.09 14:01
вообще-то, чтобы из проги удалить саму себя, батник это самый распространенный и простой способ, умнег

Ответить

Номер ответа: 13
Автор ответа:
 Starkiller



ICQ: 123123 

Вопросов: 3
Ответов: 14
  Web-сайт: google.ru/
 Профиль | Цитата | #13 		Добавлено: 30.07.09 19:06
ИМХО лучше так. Качаем файл, запускаем. Новая версия удаляет старую и все. Просто часто в офисах, больницах, школах, коледжах батники (cmd.exe) отключают ;)

Ответить

Номер ответа: 14
Автор ответа:
 DesT



ICQ: 376533105 

Вопросов: 1
Ответов: 24
  Профиль | Цитата | #14 Добавлено: 01.08.09 02:21
можно создать отдельный поток,, приатачить к какому нибудь системному процессу, в этом потоке завершить поток программы, удалить файл, а затем уже и сам поток. готово =)

Ответить

Номер ответа: 15
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
  Web-сайт: смекаешь.рф
 Профиль | Цитата | #15 		Добавлено: 01.08.09 09:49
можно создать отдельный поток,, приатачить к какому нибудь системному процессу, в этом потоке завершить поток программы, удалить файл, а затем уже и сам поток. готово


Бред. Программа же все равно будет открыта.

Ответить

Страница: 1 | 2 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам