vb6

问题 I have a base64 string which was generated from an image using another application. Now on my application I want to convert the base64 string to byte and display it on a PictureBox. I already found a sample application which takes a byte input and sets a PictureBox image. Unfortunately the sample application gets the byte array from an image and just translates it back. Here's the function it uses. Public Function PictureFromByteStream(b() As Byte) As IPicture Dim LowerBound As Long Dim

问题 i want to use VB6 WebBrowser control to browse to a website and auto-fill a webform, but whenever i make it to navigate to a website, it will prompt me a JS error - JSON undefined. Anyone can help solve this issue? My initial guess is VB6 is 'too old' for some website, but i read that it is actually using the IE version we install on our pc and im using the latest IE10 with Win7 :-? Thank you, 回答1: The error is probably thrown because the web page expects the browser engine to provide its own

问题 I'm making a program that has a login. Is there any way to encrypt the normal password so that it can't be read in the data base? I've done a trick but I'm not content with it. What I did was to get the first, mid, and last char only and convert each char into ascii. Is there a way to convert all the text into ascii or something like md5/hash in php? I'm really sorry about this thing, I haven't mentioned that my project is a VB6 project. 回答1: Don't use MD5 to store hashed passwords! See stuff

问题 I am trying to do a sum of price and quantity in an excel file and store them in database table. So here it's (Trying by myself for learning) - Suppose, these are the excel file data: ProductId - Invoice No - Invoice Date - Price - Quantity 101 - Inv-1000 - 7/10/2017 10:00 - 1000 - 10 101 - Inv-1000 - 7/10/2017 10:30 - 200 - 2 101 - Inv-1000 - 7/10/2017 10:30 - 400 - 4 'These should be merged with the above one as they have the same invoice, product id and date time 102 - Inv-1000 - 7/10/2017

问题 I am trying to do a sum of price and quantity in an excel file and store them in database table. So here it's (Trying by myself for learning) - Suppose, these are the excel file data: ProductId - Invoice No - Invoice Date - Price - Quantity 101 - Inv-1000 - 7/10/2017 10:00 - 1000 - 10 101 - Inv-1000 - 7/10/2017 10:30 - 200 - 2 101 - Inv-1000 - 7/10/2017 10:30 - 400 - 4 'These should be merged with the above one as they have the same invoice, product id and date time 102 - Inv-1000 - 7/10/2017

问题 I have developed a C++ based COM object to use it in a VB6 application. Now I need to add some logging to catch some of the bugs. I discovered from the answer to 'How to debug COM object in Visual Studio 6.0' question that I can use the OutputDebugString function. But is it possible to write to the VB6 immediate window somehow? 回答1: Rather than attempting to write to the immediate window, it would be generally more useful to use DebugView from Sysinternals (now part of Microsoft technet):

问题 I am strugling with some unwanted metadata requests automatically generated by ADO. The behavior started after replacing the default MSDASQL provider with SQLOLEDB. I have also tried the SQLOLEDB and the behavior seems to be the same. Reproducing the problem from the IDE has proved to be difficult, because it seems to be happening kinda random. Whats even more confising is that these queries seems to request metadata for previously opened (and then closed) recordsets. 回答1: I have invastigated

问题 We are moving IBM Websphere MQ to a different server(VB6 app will be in different server). I need to populate SET Server field. I am using MQAX200.DLL to connect to MQ. Please let me know how can i connect to different server from vb6. Below is the code we are currently using to connect to Queue Manager: Form1.txtstreamLog_File.WriteLine Date & " " & Time & " STATUS: Attempting to connect to the MQ Queue Manager: " & Form1.strManagerQueueName Set mconMQ = New MQAX200.MQQueueManager With

问题 i've a problem with de ScrollBar in VB6 . Watch de next gif : How can I solve that? Here's my all code: Option Explicit Private old Post As Integer Dim index As Integer Dim indicee As Integer Public Disclaimer Private Sub btnAdd_Click () index = index + 1 'we increase the index indicee = indicee + 0 'we start it at 0 pic1 (indicee) .Visible = True 'Label and TextBox type lblType (indicee) .Visible = True cmbAddType (indicee) .Visible = True 'Label and TextBox prefix lblAddPrefix (indicee)

问题 i've a problem with de ScrollBar in VB6 . Watch de next gif : How can I solve that? Here's my all code: Option Explicit Private old Post As Integer Dim index As Integer Dim indicee As Integer Public Disclaimer Private Sub btnAdd_Click () index = index + 1 'we increase the index indicee = indicee + 0 'we start it at 0 pic1 (indicee) .Visible = True 'Label and TextBox type lblType (indicee) .Visible = True cmbAddType (indicee) .Visible = True 'Label and TextBox prefix lblAddPrefix (indicee)