Search:

Type: Posts; User: reacen

Page 1 of 7 1 2 3 4

Search: Search took 0.06 seconds.

  1. Replies
    4
    Views
    657

    Re: Multi-threading issue

    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...
  2. Replies
    2
    Views
    501

    Re: Run command button after x minutes

    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!"
  3. Replies
    3
    Views
    853

    Re: Find Button To Search Text1 to Text2

    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...
  4. Replies
    3
    Views
    771

    Re: How to kill a loaded program?

    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".
  5. Replies
    8
    Views
    995

    Re: [RESOLVED] Goto Error Loop

    I think your professor just solved your problem here. There's nothing more we can do
  6. Re: Adding the items from one listbox to another.

    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...
  7. Replies
    8
    Views
    995

    Re: Goto Error Loop

    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...
  8. Replies
    6
    Views
    1,564

    Re: wait for files copy

    .
    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...
  9. Replies
    5
    Views
    1,186

    Re: Please help replace a file in VB6

    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
  10. Thread: Window bitblt

    by reacen
    Replies
    14
    Views
    1,701

    Re: Window bitblt

    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)...
  11. Replies
    6
    Views
    1,273

    Re: Problem with web browser control!

    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)
  12. Replies
    6
    Views
    1,273

    Re: Problem with web browser control!

    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...
  13. Replies
    14
    Views
    999

    Re: Having difficulty.

    That's so cute :D

    Here's what I think you should write:


    Loop Until ANSWER = "q" Or ANSWER = "Q"
  14. Thread: *Happy Eid Day*

    by reacen
    Replies
    3
    Views
    1,603

    Re: *Happy Eid Day*

    3id moubarak to everyone.
  15. Re: Windows 7 VB 6.0 project exe is not working in windows XP

    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...
  16. Replies
    2
    Views
    493

    Re: advanced debug help needded

    Just change the AcceptConnection() function in your modDatabase to this:



    Public Sub AcceptConnection(ByVal RequestID As Long)

    Dim i As Long

    i = FindOpenPlayerSlot
  17. Re: Is this piece of code 100% safe ?

    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)...
  18. [RESOLVED] Is this piece of code 100% safe ?

    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;");
  19. Replies
    8
    Views
    2,082

    Re: Converting a C# function to VB6

    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....
  20. Replies
    8
    Views
    2,082

    Re: Converting a C# function to VB6

    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...
  21. Replies
    8
    Views
    2,082

    [RESOLVED] Converting a C# function to VB6

    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...
  22. Replies
    3
    Views
    2,367

    Re: Can this piece of code go faster ?

    Anyone have an Idea please?
  23. Replies
    46
    Views
    16,270

    Re: Microsoft Says It Will Open Source VB 6

    Oh my god :D

    Edit: Oh no, wait: http://reddevnews.com/articles/2011/05/19/microsoft-to-open-source-vb6.aspx
  24. Replies
    3
    Views
    2,367

    Can this piece of code go faster ?

    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...
  25. Re: Drag & Drop audio file on to command button?

    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...
  26. Re: Drag & Drop audio file on to command button?

    Here is an example, I hope it can help. :)
  27. Replies
    13
    Views
    4,382

    Re: website login with winsock

    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:

    ...
  28. Re: sndPlaySound freezing my other forms help please

    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()
    ...
  29. Re: Removing Certain Characters from String: How Do I Do It?

    Msgbox replace$("$1.87", "$", vbnullstring)
  30. Replies
    4
    Views
    757

    Re: Cut String [HELP]

    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 &...
  31. Replies
    6
    Views
    2,124

    Re: How to bring a tab to focus in VB 6.0

    It depends if you use SSTab, or TabStrip.
    Please see the files attached.
  32. Replies
    28
    Views
    3,473

    Re: >>> Happy Birthday GaryMazzone !!!

    Happy birthday, and wooow nice cake akhileshbc, I'd love to have some :D
  33. Replies
    9
    Views
    1,077

    Re: VB6 string questions

    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...
  34. Replies
    9
    Views
    1,077

    Re: VB6 string questions

    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...
  35. Replies
    3
    Views
    636

    Re: not accepting a double in text box

    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...
  36. Re: The other side of the technology revolution!

    Eggs box, verry funny. :D
  37. Replies
    5
    Views
    872

    Re: [RESOLVED] hext to string / string to hex

    True, but I was talking about the StringToHex() function on her link.
  38. Replies
    1
    Views
    652

    Re: Changing Text in "Sprites" in SWF File?

    Not sure what you mean, but maybe:

    Shock1.SetVariable "xxx", "yyy" ?
  39. Replies
    5
    Views
    872

    Re: [RESOLVED] hext to string / string to hex

    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"...
  40. Replies
    2
    Views
    5,164

    Re: [RESOLVED] winsock error

    Maybe putting the "MSWINSCK.OCX" into the "c:\windows\system32" folder will fix that (without having to restart the computer).
Results 1 to 40 of 271
Page 1 of 7 1 2 3 4



Click Here to Expand Forum to Full Width