Search:

Thanks !

That's true.
But what if I want to use:



Public Function New_CPerson(FirstName As String, LastName As String, Optional ID As Variant, Optional BirthDate As Variant) As CPerson
Set...

Hello I'm trying to apply the method described in this URL.

The problem is that the events are not implemented in a standard way.

How can you implement the events ?

I have attach a test...

Thank you very much. :D

Yes that is an option but an event-based method is preferable.

Тhank you bazzapr! :)
I am the author of the JavaScript so I can change it.
Your method can be used but I need the function itself to return the result since the execution takes some time.
I...

Hello ,
I'm trying to execute javascript (through Webbrowser Control) from visual basic 6 and get the result of execution back in visual basic.
The code for execution:


Private Sub Form_Load()...

Is there a way to put an image in main menu bar like X button in msword. Here is how it look.
Another example :
87097

How can I add an icon in root menu ?
I mean :

file edit :)help

Is this posible ?

Hi guys :) ,
When I use inet to determine the type of file I do it with the following code
Inet.GetHeader ("Content-type"). But I decided to go to Winsock. And now I can't find a way to get the...

It was a stupid mistake by me. I don't know how I missed this.:ehh:
Thank you very much. I appreciate your work.:)

Ok :sick:
I can't fix the problem with this method so can you suggest another way to download files (with unicode support)?

Thank you very much LaVolpe :)
Your answer to solve the problem with the size.
The file is now with the same size as the original but is damaged somehow and can't be opened.
What is wrong this...

Thanks for the quick response LaVolpe :)
I modified the code as follows:



Case icResponseCompleted ' 12

Dim tempArray() As Byte
Dim vtData As Variant
Dim bDone As Boolean: bDone = False

Hello again!!!
I made some changes and now the files are downloaded files but size 1023 bytes. For some reason it seems to be retaining only the last block of downloaded information.
Here's the...

Hi again ,
I would like to know if I can dynamically change the values of table cell ?
If I load HTML document with a table in webbrowser control.
For example :


<table border="1">
<tr>...

Does anyone know how to combine GetChunk and WriteFile?
Downloaded data is stored in an array and then transmit it to WriteBytesToFile.
File is created but the size is 768 bytes. Actual file size...

Thanks for the quick response :)
I use this code to download files (as .jpg , .bmp , .exe and other) :

Case icResponseCompleted ' 12
Dim bDone As Boolean: bDone = False
...

Yes I saw this Thread but did not help.
The problem is that this part of the code

Open DestFile For Binary Access Write As #1
is working with ANSI and I do not know how to get this code to work...

Hi guys,
I'm trying to save a file with this code:


Open DestFile For Binary Access Write As #1

If file path contains Unicode characters get the following error
"Run-time error '52': Bad...

Hi again,
I would like to make ListView Control to support Unicode.
How can this happen without Forms 2 ?
Is there a way to avoid converting from Unicode to ANSI and to use original ListView...

I tested the code works perfectly :D
Thank you very much for the efforts :)

The site is http://www.abv.bg/

Thanks for the quick response :)
The above code works for 1251 but 65001 (utf-8) does not work when non-Unicode System Locale is set to Bulgarian.
So I modify the code a bit but it does not work...

Thank you DrUnicode :)
It seems I have to buy a glasses :D.
This resolve the problem.

Thanks DrUnicode,
I use this code for two sites and one of them is utf8.

I try the code that you write in the post and it generate error "function call on left-hand side of assignment must return...

So I have to convert HTML source to Hex and then put it in CaptionHex property of EruLabel control ?

Hi !!!
Thanks for the quick answer.
I've been test the code with TextBox control from Microsoft Forms 2.0 Object Library instead RichTextBox1 and now the Bulgarian characters are displayed as "￿"

Hi Guys,
I am trying to get the source code in that web page : "http://www.puulse.com/BG/Home.htm".
I use this code :



Private Sub Command1_Click()
Call...