Coolguy6318
-
Posts
134 -
Joined
-
Last visited
Content Type
Profiles
Forums
Calendar
Posts posted by Coolguy6318
-
-
Goto data in server folder and change PaperDoll=0 to PaperDoll=1
-
I lost my msdn cd
is there a way i can download msdn for vb6?(enterprise) -
How do i make the resolution change 2 what the player is using?
-
-
Thanks :cheesy:
-
How do i change this name
i tried caption in vb6 but it didn't change -
Thanks ill try that :)
-
What are transition tiles?
-
Hi all this is my 1st attempt at mapping and I just wanted to see what you think of them
Map #1
Map #2
Map #3
Map #4
 -
Try: http://www.vb6.us/ for vb 6 tuts
as for the menus open frmmenu or whatever and change it as much
as you want
on the right by properties scroll down to picture so you can add a background hope this helps :azn: -
@ѕýα∂Ãă:
> @Coolguy6318:
>
> > I did all this but when I push ctrl by npc nothing happens?
>
> Make sure the npc number and QuestNum are the same. (I believe that's correct) Anyway, if that doesn't work, maybe check the code again? Did you have Qazek's quest system working before you tried this? Let's see if we can narrow it down. :)
Ok i tested Qazeks quest system today no errors but when i talk 2 npc nothing happens :icon_crap: -
Yes its on server file just not in game
-
It works thanks
-
in eclipse client vb6 project then on top proect>properties
-
status checker where?
im using [EO] btw :) -
-
-
What do you all think of this gui as a welcome screen
Download here: [http://www.mediafire.com/imageview.php?quickkey=a7bocd6u51yyld8&thumb=4](http://www.mediafire.com/imageview.php?quickkey=a7bocd6u51yyld8&thumb=4) -
How to put a server status like ES has but on my site?
-
I click add friend and when i click ok the friends list is still blank?
-
Ok its working now i just had 2 change it to this
```
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
' Open the default browser on a given URL
' Returns True if successful, False otherwise
Public Function OpenBrowser(ByVal URL As String) As Boolean
Dim res As Long
' it is mandatory that the URL is prefixed with http:// or https://
If InStr(1, URL, "http", vbTextCompare) <> 1 Then
URL = "http://" & URL
End If
res = ShellExecute(0&, "open", URL, vbNullString, vbNullString, _
vbNormalFocus)
OpenBrowser = (res > 32)
End Function
Private Sub lblNews_Click()
Call OpenBrowser("http://godofdistruction.webs.com/apps/blog")
End Sub
```
Thanks for help :) -
Im new at this :icon_crap:
-
When i put
```
Private Sub lblNews_Click()
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
' Open the default browser on a given URL
' Returns True if successful, False otherwise
Public Function OpenBrowser(ByVal URL As String) As Boolean
Dim res As Long
' it is mandatory that the URL is prefixed with http:// or https://
If InStr(1, URL, "http", vbTextCompare) <> 1 Then
URL = "http://" & URL
End If
res = ShellExecute(0&, "open", URL, vbNullString, vbNullString, _
vbNormalFocus)
OpenBrowser = (res > 32)
End Function
```
i get compile error only comments may appear after End sub, End Function or end property -
O its working now i just had to make a new form with a web browser in it xD
Minecraft
in Minecraft
Posted