| # | Line 165 | Line 165 | Dim responseNumber As Integer | |
|---|---|---|
| 165 | ||
| 166 | Private Sub Form_Load() | |
| 167 | ||
| 168 | + | If App.PrevInstance Then |
| 169 | + | x = MsgBox("There is already an i-scream Winhost running on this machine.", 48, "i-scream host already running") |
| 170 | + | End If |
| 171 | + | |
| 172 | protocolVersion = "1.1" | |
| 173 | ||
| 174 | Status.Caption = "Loading" | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |