Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: Запуск стороннего приложения Добавлено: 24.05.07 00:45  

Автор вопроса:  dreed7
Помогите. плиз
В RichTextbox есть текст, который нужно открыть с помощью определенной программы. Помогите это реализовать.

В итоге получиться должно так:
1, Вкладка Настроуки, пункт-Найти программу(это наверное надо будит сохранит в настройках при следующем запуске прогр.)
2. При нажатии на кнопку . Сохраняется временный файл и открывается при помощи указанной программы в настройках.

Ответить

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

Номер ответа: 1
Автор ответа:
 EUGY



Вопросов: 0
Ответов: 454
 Профиль | | #1 Добавлено: 24.05.07 01:53

Option Explicit
Private strmypro As String

Private Sub Command1_Click()
    Dim strsavfile As String
    strsavfile = "C:\test.txt"
    RichTextBox1.SaveFile strsavfile, rtfCFText
    Call Shell(strmypro & " " & strsavfile, vbNormalFocus)
End Sub

Private Sub Form_Load()
    strmypro = GetSetting(App.Title, "My settings", "openwith";)
    If Len(strmypro) = 0 Then strmypro = "C:\windows\notepad.exe"
End Sub

Private Sub OpenWith_Click()
    CommonDialog1.Filter = "выбор проги|*.exe"
    CommonDialog1.ShowOpen
    strmypro = CommonDialog1.FileName
    SaveSetting App.Title, "My settings", "openwith", strmypro
End Sub


Ответить

Номер ответа: 2
Автор ответа:
 dreed7



Вопросов: 1
Ответов: 3
 Профиль | | #2 Добавлено: 24.05.07 15:07
а можно коментарии.
файл должен сохраняться в формате .stp

Ответить

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



Вопросов: 1
Ответов: 3
 Профиль | | #3 Добавлено: 24.05.07 15:09
и если не сложно выложи посмотреть исходник

Ответить

Номер ответа: 4
Автор ответа:
 EUGY



Вопросов: 0
Ответов: 454
 Профиль | | #4 Добавлено: 24.05.07 18:17
если у тебя есть уверенность в возможность конвертации из RTF в STP.
то:
strsavfile = "C:\test.stp"
RichTextBox1.SaveFile strsavfile, rtfCFRTF
остальное без комментариев.
на форумах вряд-ли кто на блюде выложит.
попроси www.rentacoder.com

Ответить

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



Вопросов: 1
Ответов: 3
 Профиль | | #5 Добавлено: 24.05.07 21:27
ошибка в переменной rtfCFRTF
переменная не определена

Ответить

Номер ответа: 6
Автор ответа:
 EUGY



Вопросов: 0
Ответов: 454
 Профиль | | #6 Добавлено: 24.05.07 21:49
писал по памяти, мог и ошибиться.
скорее всего
RichTextBox1.SaveFile strsavfile
и так сохраняет в rtf

Ответить

Страница: 1 |

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



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