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

   
   
     

Форум - Общий форум

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

 

  Вопрос: Бета-релиз XQR2: Ultimate Innovation 1.1.0.2 Добавлено: 01.07.09 18:26  

Автор вопроса:  VβÐUηìt | Web-сайт: смекаешь.рф

Ответить

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

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



Вопросов: 246
Ответов: 3333
  Web-сайт: смекаешь.рф
 Профиль | | #46 		Добавлено: 04.07.09 20:51
Народ. Я конечно понимаю, что лень, но может кто-то все-таки еще скачает? :)

Ответить

Номер ответа: 47
Автор ответа:
 Дмитрий Юпатов



Вопросов: 4
Ответов: 457
  Web-сайт: cargomaster.at.ua/
 Профиль | | #47 		Добавлено: 05.07.09 01:38
Скачал, поставил, глюков, указанных в постах выше, не заметил (правда не все искал...). В целом - понравилось. Но, думаю, антивирь там - пятое колесо. А так - отлично.
Снес, т.к. пока полезности от проги не ощутил. Однако ж, дистрибут оставил :)
Не понял, как сносить, в перечне установленных программ ее нет. Удалил ручками с зачисткрй реестра... Может, я и протупил, но разбираться впадло было

Ответить

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



Вопросов: 246
Ответов: 3333
  Web-сайт: смекаешь.рф
 Профиль | | #48 		Добавлено: 05.07.09 10:42
Благодарю за тестинг.

ЗЫ: В пуске он оставляет васю "Удалить".

Ответить

Номер ответа: 49
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
  Web-сайт: winandfx.narod.ru
 Профиль | | #49 		Добавлено: 06.07.09 01:10
в вендусе 7 вася с петей не удаляются из пуска после деинсталляции.
Также должен быть запрос - удалить настройки или нет

Ответить

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



Вопросов: 246
Ответов: 3333
  Web-сайт: смекаешь.рф
 Профиль | | #50 		Добавлено: 06.07.09 06:58
Ок. Только народ, можно как-нибудь узнать расположение меню "Пуск" в Windows 7/Vista? Я просто никак найти не могу, пытаюсь обходными путями - не получаецо.

Ответить

Номер ответа: 51
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
  Web-сайт: winandfx.narod.ru
 Профиль | | #51 		Добавлено: 07.07.09 01:53
Вчера буквально разбирал примеры говно-кода на компе, и наткунлся на то, как создавать ярлыки в определенных папках. Так вот, папка рабочего стола там узнается в 3 строчки:
  1.    Dim WshShell As Object
  2.    Set WshShell = CreateObject("WScript.Shell")
  3.    MsgBox WshShell.SpecialFolders("Desktop")

На Win7 работает.

Ответить

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



Вопросов: 246
Ответов: 3333
  Web-сайт: смекаешь.рф
 Профиль | | #52 		Добавлено: 07.07.09 08:25
Ясно, а меню - это "StartUp"?

Ответить

Номер ответа: 53
Автор ответа:
 Smith



ICQ: adamis@list.ru 

Вопросов: 153
Ответов: 3632
  Профиль | | #53 Добавлено: 07.07.09 10:25
Programs

Ответить

Номер ответа: 54
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
  Web-сайт: winandfx.narod.ru
 Профиль | | #54 		Добавлено: 07.07.09 12:11
  1. Enum ShortCutDest
  2.     DeskTop
  3.     Programs
  4.     StartMenu
  5.     StartUp
  6. End Enum
  7.  
  8. Public Function CreateLink(dest As ShortCutDest, ByVal sName As String, ByVal sPath As String, Optional HotKey As String = "", Optional sIcon As String = "", Optional sWorkingDirectory As String = "", Optional sSubFolder As String = "", Optional WinStyle As Integer = vbNormalFocus)
  9.    Dim WshShell As Object
  10.    Dim oShellLink As Object
  11.    Dim sLinkPath As String
  12.    Set WshShell = CreateObject("WScript.Shell")
  13.    Select Case dest
  14.        Case DeskTop
  15.             sLinkPath = WshShell.SpecialFolders("Desktop")
  16.        Case StartMenu
  17.             sLinkPath = WshShell.SpecialFolders("StartMenu")
  18.        Case StartUp
  19.             sLinkPath = WshShell.SpecialFolders("StartUp")
  20.        Case Programs
  21.             sLinkPath = WshShell.SpecialFolders("Programs")
  22.    End Select
  23.    On Error Resume Next
  24.    If sSubFolder <> "" Then
  25.       sLinkPath = sLinkPath & "\" & sSubFolder
  26.       If Dir(sLinkPath) = "" Then MkDir sLinkPath
  27.    End If
  28.    On Error GoTo 0
  29.    Set oShellLink = WshShell.CreateShortCut(sLinkPath & "\" & sName & ".lnk")
  30.    oShellLink.WindowStyle = WinStyle
  31.    oShellLink.HotKey = sHotKey
  32.    oShellLink.TargetPath = sPath
  33.    oShellLink.IconLocation = sIcon
  34.    oShellLink.Description = sName
  35.    oShellLink.WorkingDirectory = sWorkingDirectory
  36.    oShellLink.Save
  37.    Set oShellLink = Nothing
  38.    Set WshShell = Nothing
  39. End Function
  40.  
  41. Private Sub Command1_Click()
  42.    CreateLink DeskTop, "Calculator", "c:\windows\calc.exe", "CTRL+SHIFT+C", "calc.exe,0", "c:\windows"
  43.    CreateLink StartMenu, "Calculator", "c:\windows\calc.exe", "CTRL+SHIFT+C", "calc.exe,0", "c:\windows"
  44.    CreateLink StartUp, "Calculator", "c:\windows\calc.exe", "CTRL+SHIFT+C", "calc.exe,0", "c:\windows"
  45.    CreateLink Programs, "Calculator", "c:\windows\calc.exe", "CTRL+SHIFT+C", "calc.exe,0", "c:\windows", "WinCalc"
  46.    CreateLink Programs, "Calculator Help", "c:\windows\help\calc.hlp", "", "winhlp32.exe,0", "c:\windows\help", "WinCalc"
  47.    CreateLink Programs, "Visit our web site", "http://vbcity.com", , "shdocvw.dll,0", , "WinCalc", vbMaximizedFocus
  48. End Sub

Ответить

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



Вопросов: 246
Ответов: 3333
  Web-сайт: смекаешь.рф
 Профиль | | #55 		Добавлено: 07.07.09 12:42
Благодарю.

Ответить

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



Вопросов: 246
Ответов: 3333
  Web-сайт: смекаешь.рф
 Профиль | | #56 		Добавлено: 16.07.09 15:59
Недавно выложил презентационный клип на официальный сайт XQR2

Ответить

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



Вопросов: 246
Ответов: 3333
  Web-сайт: смекаешь.рф
 Профиль | | #57 		Добавлено: 27.11.10 17:02
...и обновил сам сайт :)

Ответить

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

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



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