Posts by vb5prgrmr

No, with mine, all rows are updated with the information from each row. (If I remember my syntax correctly, just give it a try and see what happens.)

Good Luck

Well if it is your program, then make it write out a text file, and use shell or the shellexecute API to launch notepad with the file you have created. Now if this program is not yours, well it is time to use your friends (yahoo, google, ask, answers, bing) to search for vb6 and the API you want to learn about, like, vb6 findwindow, or vb6 enumchildwindows.

I suggest this because there is so much code out there for visual basic 6 and .net that it is not funny. Also, other places to check for code examples can be found in the first or second pinned thread of this forum.

Good Luck

Usually when something is in a plural form, it is a collection of objects and there should be a singular form that can reference a specific object from the collection. However, to enumerate through that collection you would do something like...

Dim MyCharts As Object, AChart As Object
Set MyCharts = Worksheet.ChartObjects
For Each AChart In MyCharts
  '...

Now that is normally and the above code is just off the top of my head as I don't do much VBA programming so you would have to check on those objects.

As for why it is all of a suddenly working, well maybe it forgot its own reference and you reminded it??? :)

Good Luck

Is that actual size or size on disk?

A list box with its multiselect property set to 1 - Simple or 2 - Extended will do fine, so no need to learn about a new control just yet, but it does raise the question, why a list box and not check boxes? Since you only have three options, it would be just a little bit easier to test check boxes versus items in a list box.

If Check1(0).Value = vbChecked And Check1(1).Value = vbUnchecked And Check1(2).Value = vbUnchecked then
  'do stuff here...
'0, 1, 0
'0, 0, 1...
ElseIf Check1(0).Value = vbChecked And Check1(1).Value = vbChecked And Check1(2).Value = vbUnchecked Then
  'do stuff here...
'1, 0, 1
'0, 1, 1
'1, 1, 1
'0, 0, 0...
End If

Good Luck

The same process goes for all controls so all you need to do is apply it to your control and make any changes as necessary. So, study the code, walk through it by F8, and look for those things that specifically name a control. Like ... text1.hwnd..., it will be things like that, that you will need to change...

Good Luck

These example projects demonstrate enabling the MouseWheel for any control (multiple controls / multiple forms).

Probably did not see it as the Queen's link takes you to the second post...

Good Luck

Or if you are lucky enough, you could use multiple lines and have their dashes line up. Just change the point of where it starts and ends at (one pixel).

Good Luck

Okay, if I understand you right. The program of yours is the source of the text that is pasted into notepad. If this is true, then there are several ways in which to solve this.

First, you could write the text directly to a text file by using the following...

FreeFile Function
Open Statement
Print Statement
Close Statement

(Look up in VB's help if you need more help)

Now, if you are wanting to post this data directly into notepad, without writing a file to disk... Well this is going to be harder to do. You will need to know and use a fair amount of API...

FindWindow 'finds the parent window
EnumChildWindow 'find the "text area" of notepad
SendMessage with WM_SETTEXT const 'puts the text into the running notepad application

Now, if on the other hand, the data is coming from notepad and you want to import it into your program well then...

FreeFile Function
Open Statment
Input Function or Line Input Function
Close Statement

Or if you want to copy directly from notepad... (API once again)

FindWindow
EnumChildWindow
SendMessage with the WM_GETTEXT const.

Good Luck

See my post...

here is a one shot deal that you can use with the command object...

strSQL = "UPDATE cooperatesubs SET [cooperatesubs].[copiesremaining]=[cooperatesubs].[numberofcopies]-[cooperatesubs].[copiesout]"
Cmd.Execute strSQL

and if you open your connection to the database with pessimistic locking, the whole table will be updated in one shot without errors from other people accessing the data in a multi user environment.

Good Luck

There is always the masked edit control....

Good Luck

Show us what you have as there are so many different ways in which to do this, we would not want to lead you down a different road unless we had to...

Good Luck

You need to use the CurrentX and CurrentY to set the position of where you want the text to be drawn...

Me.CurrentX = 1000
Me.CurrentY = 1000
Me.Print "This is a test"

Good Luck

Now you have not used bb code tags correctly, see http://www.daniweb.com/forums/misc.php?do=bbcode and you have also posted in the wrong forum because that is not classic vb code. Close, is that .NET???

Good Luck

Speaking of forgetting things... http://www.thescarms.com/VBasic/SubClassTxt.aspx

Good Luck

While this is for text boxes, it has the info you need. All you need to do is to apply it to your needs.

Good Luck

Well without seeing your code it is hard to tell, but generally an Exit For is used to speed up a procedure by exiting the for loop as soon as some condition is met...

pseudo code...

For LoopCounter = SomeStartValue To SomeEndValue Step SomePositiveOrNegativeValue 'defalut is + 1
  If SomeValue = SomeCondition Then Exit For
Next LoopCounter

Good Luck

ggeu,

You have gone over the same information that I have posted and the OP, pan, has replied to my post that you repeated, that they cannot place a control on the form at design time and that they must create the control at run time. Which means this is the code pan is looking for...

Dim C As PictureBox
Set C = Controls.Add("VB.PictureBox", "Picture1")
C.AutoRedraw = True
C.AutoSize = True
C.Picture = LoadPicture("C:\Program Files\Microsoft Visual Studio\Common\Graphics\Bitmaps\Assorted\balloon.bmp")

C.Visible = True

Good Luck

First off, you have not instantiated a new picture box in itself, just a reference to a picturebox and to make things easier, I'll skip what that means and say this...

Put a picturebox on the form, change its index to zero (0), add a command button, add the following code...

Load Picture1(1)
Picture1(1).Left = Picture1(0).Left + Picture1(0).Width + 30
Picture1(1).Top = Picture1(0).Top
Picture1(1).Visible = True

Then you need to use the loadpicture function (or before visible) to put a picture in the box...

However, it looks like you are just wanting to keep an array of images in memory. If so, then you will need to change your code to this...

Dim mimage() As PictureBox
ReDim mimage(0 To num1) As PictureBox
mimage(num1).Picture = LoadPicture("path\filename.jpg")Dim mimage() As PictureBox
ReDim Preserve mimage(0 To num1) As PictureBox
Set mimage(num1).Picture = LoadPicture("path\filename.jpg")

Good Luck

You will have to add the setup files to your setup package.

Then you have a couple of options...

1) Customize the Setup1.exe project so that it installs the MySQL files with, if any, of the appropriate command line switches if user wants it on that particular machine. Meaning, install the service on one machine as the server and just the program on other machines. (I must warn you that if you go this route, you need to make at least two backup copies of this project that you can find where vb is installed on your computer)

2) Use Inno, Wise, or some other 3rd party software to do this for you.

3) Include it as a seperate setup package with instructions on how to setup the system, especially if you are wanting to make it easy on yourself and the end user so that they can pick the machine the service is installed on.

Good Luck

Okay, First, let me explain the Name property for you. The Name property is the name of the control. Second, ListBox1 tells me that you are using VBA controls like the ones found in access, excel, word, which means this is a VBA question and not a VB question.

Now in vb we would loop through from zero to list1.listcount-1 searching for if text1.text = list1.list(loopcounter) to see if we have found a match as that is what it looks like you are trying to do, but from that small snippit, it is hard to tell.

Good Luck

Okay, it has been awhile sinced I attempted to answer a VBA question, but my mind sort-clicked as the dark recesses of it stired... I believe there are two ways in which to do this. One is to declare a varible public in this workbook and the other is something like x=sheet1:range("fred").value as called from sheet two. If the syntax is wrong, sorry, the dust in the corners is quite deep now... :)

Good Luck

That first Rs.Update may need to be Rs.Edit or just removed like manoshailu already said. Also, it should be Rs.Fields("FieldName").Value = newvalue for readability and maintainability.

Good Luck

Geez!!! Where is that wizard school that turns out all these newbies who think they can raise the dead threas!!! I mean it is just so uncouth and gives so many people the willies! :)

All funnies aside esh03, it is impolite to ask your question in another persons thread. In the future if you need to reference another thread, copy its url into your new thread, along with your question.

Now, did you follow the instructions in the posts above? If not give them a try. If they don't work, well then your form is lost and you will have to start over...

Good Luck

glad I could help, now if you don't mind, could you please mark this thread as solved...

Thanks

Ahhhh!!!! another necrophiliac!!! He plays with the dead!!!! I mean just gross!!!! Nasty!!! Yuck!!! :)

All kidding aside yimon, raising the dead threads is not nice as it gives the people the willies!!!

In the future, when you have a question to ask and there is a thread that is similar, please copy its url into your new thread if you need to reference it.

As for your question, the API declaration is for standard dll's and as such yours is an activex dll what you need to do is... Project>references>browse>select dll>ok. Then you should be albe to reference like any other reference in VB.

If that did not help, then it is time to use your friends (yahoo, google, ask, answers, bing) to search for vb activex dll tutorial...

Good Luck

See...

http://www.shrinkwrapvb.com/

Good Luck

Well for somthing that happens only once a day and only after midnight, you could increase the interval to its max, 65535, which is just over a minute...

Good Luck

Ahhhh!!! A necrophiliac!!!! It plays with the dead threads!!!

Please, in the furture, if you need to reference and old thread, copy it's URL into your new thread...

As for your question, it is time to use your friends (yahoo, google, ask, answers, bing) and search for vb6 rs232. You will find many examples out there.

Good Luck

What codes do I need if I want to retrieve data from my database from one pc to where my database is?

You need to point your program connection to, as debasisdas said, to the database on the shared drive...

But how do you do this, you ask?

You are going to need to use either the registry (maybe you can still get away with using GetSettings/SaveSettings or perhaps you will need to use the API) or a setting file (INI) to store a couple pieces of information. The first piece of information is has the program been run before on this computer. If it has then retrieve the path to the database (your second piece of information you will need to store) and assemble your connection string. If not, prompt (maybe with common dialog) user for the path to the database, once recieved, save it, build your connection string and continue on.

Another way, if all machines have the same drive letter mapped to the same share where you database is, is to hard code this information and then you may not need the registry or the setting file.

What codes do I need if I want to retrieve data from my database from one pc to where my database is?

Search the web/this site for ADO tutorial and see http://www.connectionstrings.com

If I declared a variable publicly in a module, will its values overlap if two people are using it at the same time …

see http://www.connectionstrings.com

Good Luck

1) Carefully!!! :) VB might be able to read the code but it will not be able to interpret it. It will just think it is a string. Then depending upon how you coded it in excel and what you coded in excel, you might be able to just cut-n-paste with very little modification.

3) VB can display a lot of different graphic formats and with some code and API you can increase the amount of formats it can handle. Then with either some built in functions or through the use of API's you can manipulate those graphics. Now, from the sounds of it you might want to look up some game tutorials as they do deal with some of those API's and graphics.

Good Luck

scalemode the same for all? because this works (as a test)

Picture2.PaintPicture Picture1.Picture, 0, 0, Picture2.ScaleWidth, Picture2.ScaleHeight, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight

and picture2 is set at double the size of picture1...

Properties changed at design time
AutoRedraw
ScaleMode = vbPixels
Picture1.AutoSize = True 'while picture2.autosize = false

Good Luck

Oh okay! You want to search on vb drag and drop tutorials and on vb6 resizing controls at runtime...

http://search.yahoo.com/search?p=vb6+drag+and+drop&toggle=1&cop=mss&ei=UTF-8&fr=yfp-t-701

http://www.tek-tips.com/viewthread.cfm?qid=501202

Good Luck

Then you might want to switch over to using a webbrowser control as animating gifs in an RTB might be nearly impossible. (Mark those words... nearly impossible if not impossible.)

I'm going to suggest that you go over to either http://www.tek-tips.com and place your question in the VB 5/6 forum (forum # 222) and hope strongm replies or go over to http://www.vbforums.com as it has a lot more traffic and posters who might have a solution.

Good Luck

Sounds like you want to create a modified paint program. Meaning, besides line and circle you have predefined shapes like square, rectangle, rhombus, trapaziod, a graphic for computer, server, router, and hub, etc...

here are some possible solutions for you...

http://www.planetsourcecode.com/vb/scripts/BrowseCategoryOrSearchResults.asp?chkCode3rdPartyReview=on&cmSearch=Search&optSort=Alphabetical&chkCodeTypeZip=on&chkCodeTypeText=on&chkCodeTypeArticle=on&chkCodeDifficulty=1%2C+2%2C+3%2C+4&blnResetAllVariables=TRUE&txtMaxNumberOfEntriesPerPage=10&txtCriteria=diagram&lngWId=1

and if they don't inspire you, please come back...

Good Luck

I don't think so... but with that said, you can group them by their names... i.e.

formInvOrd
formInvRec
formInvTrans

BUT, if you do find a way, I would surely like to know. As for tools that you might find handy, check out MZTools...

Good Luck

Are you talking about the animation of the image? Meaning, are they animated gifs? If so, there are a lot of free software out there for making an animated gif and all you need to do is to use your friends (yahoo, google, ask, answers, bing) to search for it.

Now, if you are talking about making it move, you can load it into an image box and then alter the left and top properties, say inside a timer and once again, use your friends...

Good Luck

Well first off, how would you tell if this program is done? If you know the answer to that, switch your code to ShellExecute API and WaitForSingleObject API...

Good Luck

Huh? http://support.microsoft.com/kb/191212

Good Luck

Also see... http://www.connectionstrings.com for connection information...

Good Luck

See...

http://www.wisegeek.com/what-is-a-neural-network.htm

for a definition of a neural network. As for Visual Basic 6.0 or even .Net to attempt such a thing is a momentous task that just might be out of reach of MS technologies but if you really want to give it a try... well then you are first going to need to communicate between programs on different machines. Which means, you will have to at least look at DCom, or MSMQ. You will also need to figure out how to make each individual "node" learn. Then you will need a few thousand machines to run your network on but you might be able to get away with a few hundred with each of them running several "nodes" in the hierarchy one after another.

No small task to say the least...

Good Luck

The scanner should have a configuration utility and with this utility you can specify characters appended to the string. In this case, the software is sending a tab character. You should be able to specify no character or another key press like enter if you are wanting to allow multiple entries into a multiline text box...

Good Luck

Now, I want you to think about the FLAGS constant. I want you to look at how it is declared and then read the uFlags arguement in the help file for SetWindowPos...

Good Luck

API time... FindWindow to get the handle to the window, and SetWindowPos... If you search the web you should be able to find at least a few examples.

Good Luck

Ahhh!!! Another necrophiliac, necromonger, necromancer!!! It raises the dead!!! Ahhh!!!!

All kidding aside chupa charles, it is not nice to raise the dead threads. It gives people the willys!

Please, in the future, if you need to reference another thread, copy its url into your new thread.

Now, to answer your question. Use the data form wizard, of which you will find under add-ins>add-in manager. Load it up and follow the wizard and I suggest that you use every combination of form with control/code/class against one of the databases where you have vb installed like biblio.mdb. Then save this project for future reference.

Good Luck

Okay, not sure about any of the grid controls that come with vb as I don't use them that often, BUT, I believe this custom control will do what you want.... http://www.vbaccelerator.com/home/VB/Code/Controls/S_Grid_2/S_Grid_2/article.asp

Good Luck

Ahhh!!!! IT'S A NECROPHILIAC! A NECROMONGER! A NECROMANCER! And with a name like ihcur, you know it just got to be evil. I mean look at it! It raises the dead!!! Ahhh RUN!!! RUN FOR YOU LIVES!!!! AHHH!!!

All kidding aside ihcur, welcome to the forum! :)

Please, in the future if you need to reference another thread, copy its url into your new thread as raising the dead around here gives people the willys... :)

As for your request, I doubt anyone would be willing to just give you the code for an IVR system (for those that don't know what an IVR system is see this yahoo search... http://search.yahoo.com/search?p=what+is+an+ivr+system&toggle=1&cop=mss&ei=UTF-8&fr=yfp-t-701 ). Now if you are dead set upon someone giving you the code, well I believe that will come with a price and your best bet is to go over to http://www.rentacoder.com and place your job up for bid.

BUT! If you are willing to do this yourself, then I have some suggestions for you. First, goto MS and download their speech recognition sdk... http://search.microsoft.com/results.aspx?form=MSHOME&mkt=en-US&setlang=en-US&q=voice+recognition+sdk (SAPI).

Then, there are several ways in which to get your computer to speak back to you. One way is to use the text to speech sdk http://search.microsoft.com/Results.aspx?q=text+to+speech+sdk&mkt=en-US&FORM=QBME1&l=1&refradio=0&qsc0=0

and this little read is an introduction to both... http://msdn.microsoft.com/en-us/library/ms870025.aspx

Good Luck

One way would be to use a for loop from 7 to 1 step -2 and inside of that loop you would need to use the Space Function, to set the number of spaces you will need to pad to the left, and the Left Function to grab x number of characters from a string that you initialize before you go into the loop.

Good Luck