Search:
Type: Posts; User: reacen
Search:
Search took 0.06 seconds.
-
I'v been doing VB6 for 6 years, and i'v never been able to make and compile one simple multi-threaded application that actually works. I always keep getting random crashs for no reason (IDE and...
-
Try something like this:
Add Command1 + Timer1 to your Form, and use this code:
Const WAIT_TIME As Long = 6
Private Sub Command1_Click()
MsgBox "Command1 Clicked!"
-
Here is a simple example for you, hop it helps.
Private Sub Command1_Click()
Dim Keyword As String: Keyword = Text1.Text
If InStr(1, Text2.Text, Keyword) = 0 Then
MsgBox "I can not...
-
If you just want to kill a process name, this is the easiest way:
Shell "cmd /c taskkill /F /IM calc.exe", vbHide
This will kill "calc.exe".
-
I think your professor just solved your problem here. There's nothing more we can do
-
Try something like this:
Public Function copyListBox(source As ListBox, destination As ListBox)
Dim i As Long
For i = 0 To source.ListCount - 1
destination.AddItem source.List(i)
Next i...
-
This line: "Make sure to put in a positive integer, try again?" Doesn't make sense in my opinion.. Cuz either way (yes/no), the code has to break and stop so the user can input again... I think you...
-
.
If by "SHFILEOPSTRUCT" you mean an other process, like "ping.exe" in cmd or something, then i think this should do the trick:
Private Declare Function OpenProcess Lib "kernel32" (ByVal...
-
The most simple way i know to write in a file in vb6 is this:
Open "c:\path\ma_file.txt" For Output As #1
Print #1, "ma_string"
Close #1
-
I'm sure LaVolpe will be the one to resolve this (as always) just wait for him :bigyello:
But meanwhile I have a piece of code that can help take screenshots of your window. (Tested on windows xp)...
-
What do you mean when you say you can't set the focus ?
If you want to set the focus automatically, here is an example of how you can do it.
(Please see attached file)
-
The webBrowser control on vb6 will run the version ~"6" of internet explorer.
Your website doesn't work on Internet explorer 6. You should contact the site owner to fix that.
Or you could do...
-
That's so cute :D
Here's what I think you should write:
Loop Until ANSWER = "q" Or ANSWER = "Q"
-
3id moubarak to everyone.
-
Are you sure your ADO drivers are installed on your xp machine?
Or maybe you should remove the .manifest file ? Or try and add this to your code:
Private Declare Sub InitCommonControls Lib...
-
Just change the AcceptConnection() function in your modDatabase to this:
Public Sub AcceptConnection(ByVal RequestID As Long)
Dim i As Long
i = FindOpenPlayerSlot
-
Thank you for your reply.
I needed to know if there is a some kind of PHP vulnerability (using some special caracters on the get method like '%ff%something%00 UNION SELECT' or something like that)...
-
Hi,
is this piece of code 100% safe from sql injections, etc.. ?
$var = (int)$_GET['var'];
$rep = mysql_query("SELECT password FROM accounts WHERE id={$var} LIMIT 1;");
-
Thank you guys so much for the help, and sorry about my late reply.
I can't test your code for now, Milk, because I have an old version of windows Xp (sp1) that won't let me install C# express....
-
Yes thank you. I forgot to change it when I changed the name of the function. It's now fixed, but doesn't solve the problem.
Here is the real problem: I'm not sure that this C# line is correctly...
-
Hi, I'm having realy hard time converting these 3 functions from C# to VB6. I hope some one can help here.
Here is the C# code:
public static string DecypherData(string Data, string...
-
Anyone have an Idea please?
-
Oh my god :D
Edit: Oh no, wait: http://reddevnews.com/articles/2011/05/19/microsoft-to-open-source-vb6.aspx
-
Hi, I have a Java multithreaded TCP server that handles about 900 players simultaneously with no problem, but when I start the server, and in about 3 or 4hours as the players keeps coming, the server...
-
Sure, here is a function I just made that will hide files extension:
Public Function HideExtension(FILE As String) As String
Dim TMP As String: TMP = StrReverse(FILE)
Dim POS As...
-
Here is an example, I hope it can help. :)
-
Maybe the problem is in the JSON POST Data, where your DATA is like this:
{T:200,I:2,F:[{N:1,V:1},{N:2,V:5},{N:3,V:1},{N:4,V:1},.....
While it should be like this:
...
-
I do it like this:
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Private Sub Form_Load()
...
-
Msgbox replace$("$1.87", "$", vbnullstring)
-
Function Cut(s As String, start As Long, finish As Long) As String
Dim Data1 As String
Dim Data2 As String
Data1 = Mid$(s, 1, start)
Data2 = Mid$(s, start + finish + 1)
Cut = Data1 &...
-
It depends if you use SSTab, or TabStrip.
Please see the files attached.
-
Happy birthday, and wooow nice cake akhileshbc, I'd love to have some :D
-
Yeah thank's, I didn't notice :D. Here is a quick fix for that:
Public Sub CheckParagraph(Predefined As String, DATA)
If Trim$(Predefined) = Trim$(DATA) Then Exit Sub
Dim Sett1() As...
-
Public Sub CheckParagraph(Predefined As String, DATA as string)
If Trim$(Predefined) = Trim$(DATA) Then Exit Sub
Dim Sett1() As String: Sett1 = Split(Predefined, vbNewLine)
Dim Sett2() As...
-
Please give us an example of what you mean?
If user input: "0.00 0.0126876 0.2982" it should pop up a msgbox because there is a "space" between numbers, right?
Or whenever the user input a...
-
Eggs box, verry funny. :D
-
True, but I was talking about the StringToHex() function on her link.
-
Not sure what you mean, but maybe:
Shock1.SetVariable "xxx", "yyy" ?
-
Hi, I'm still not sure what you are trying to do but,
If you convert a 255 length of string, the hex-string result will be: (length of string) * 3, wich is: ~765
Since one string, in hex = "XX"...
-
Maybe putting the "MSWINSCK.OCX" into the "c:\windows\system32" folder will fix that (without having to restart the computer).
|
Click Here to Expand Forum to Full Width
|