Tracking Forums, Newsgroups, Maling Lists
Home Scripts Tutorials Tracker Forums
 
  HOME    TRACKER    Visual Basic




The Ask Feature


Hey Everyone:

I'm not big on the VB Word thing (More of an Excel guy), but I was hoping to take a Doc template and have it prompt the user when the Templates opened to enter an Org ID#, then put that number into two textboxes (1 on the first page, one on the second)...

The catch is that I'd like to do this without using VB Code if possible.

I've used the Fill-In feature before and it worked with no problems, but this Word Doc wasn't created by me, and it's got all sortsa tables, Headers, and text boxes... Makes it hard to find a spot on the Page itself for these Org ID# so they'll hafta go in the affor mentioned text boxes (which BTB hang out over top of the Doc Header).

So I know very little about Field Codes and I wanna have the Fill-In or Ask Features prompt the user when the Doc is opened, then place the ID# in both text boxes...

I hope this is clear. I know how awkward my newbie vocabulary must sound to the Trained Word VBer, but I hope someone can point me in the right direction.

If Code must be used to accomplish this task, I'm hoping a simple Input Box can suffice-- I don't know how to set Bookmarks and stuff so a little exposition on that might help (tried futzing with it myself, but they don't seem to take...

--Dodd




View Complete Forum Thread with Replies

See Related Forum Messages: Follow the Links Below to View Complete Thread
Feature?
Hi all!

Look through the following code:

Class Cl
-------------------
Public str As String

-------------------
Sub ttt()
Dim s As New Cl
s.str = "qwerty"
tt s.str
MsgBox s.str
End Sub

Sub tt(ByRef sss As String)
sss = "asdfg"
End Sub
-------------------

What are you going to get in the msgbox?
s.str is passing ByRef but is not changing by sub.
It seems strange to me. Is it a feature?

Always On Top Feature...
i dont have ideia how i do this!
someone already used this?

SMS Feature
Hello all,

I am trying to build a Client/Server VB application (appointment system)
with the SMS feature eg. SMS to a group of customer a day before their
appointment.

Can anyone tell me what kind of tools can I use and any
hardware/installation required for this task?

Thanks in advance.

Joe

MDI Bug/feature Help Needed.
Ok, here is the senario, I am running VB 6, with SP 5 (newest). I have one MDI parent, and one child, each form has a different set of menu items. Whenever the child form has focus, the parent will replace it's menu with the child's menu. I have tried tinkering with the Negotiate Menu property, however, it does absolutely nothing (bug?). I need a way to keep the mdi child and parent menus separate (as they should be..), and if need to be, I'll have to create a custom menu control so I can work around this (bug/feature). However, I would prefer not to do that if there is a workaround this…. Issue. Maybe an API call?

Excel - Bug Or Feature?
Here's the scenario, you're working on a worksheet, adding some formulas with functions and everything is going fine. You edit a formula and hit <Enter>, and instead of showing the result of the formula, it shows you the formula itself, not interpreted at all, just as a text string.

Does anyone know why this happens sometimes and what you can do about it?

DateAdd Feature
Im using the DateAdd feature to add a day on each time i click a button, at the moment it does this:

01/01/2008

"click the button"

02/01/2008

My code is:

Private Sub Command3_Click()
lblDay.Caption = DateAdd("d", 1, CDate(lblDay.Caption))
End Sub

what i want to do though is this:

1 January 2008

"Click the button"

2 January 2008

What am i missing from my code to do this please?

Using The SUM Feature In A Macro
Hi all. I am trying to perform a sum. I recorded myself doing this in order to get the code, and then tried to enter variables as shown below:

Code:
ActiveCell.FormulaR1C1 = "=SUM(R[X]C[y]:R[X - (Sumcount - 1)]C[y])"

X, y and Sumcount are all variables and I figured this would work. Instead, I get "Run-time error '1004'". Any ideas why my variables won't work?

Also, if my numbers are in rows 2-10 (same column), does my sum HAVE to go in row 11 or can I have it show up in row 1? I could always cut and paste the value afterwards but I am wondering if it can be done another way.

Thanks.

Combobox Feature?? Help!
When combo have already had a value item (e.g. default value or already selected one of item that will be highlight), try to click the combo list button to retrieve items in list (for reference or others) and then type something directly in combobox. At this moment, List will change depending upon what you type. However, problem occurs here. If press Enter after type something, the string you typed will lose and previous value item or empty string replace in combobox.

is it a no solution problem? if not, please tell me how to keep the value after press enter. THX!!

Login Feature Help. *Please Look*
I had a couple threads open, but I felt this was on a different line. I have attached my test project *not the actual project* for this feature. I get the same message everytime. Please help me find where I went wrong. Here's the code itself also. Thanks:


Private Sub cmdOK_Click()
Dim iCount As Integer 'sets variable as Integer
Dim itrue As Integer 'same thing
iCount = 1 'defining what the variable is
itrue = 0 'same thing

If txtPassword.Text = "" And txtUserName.Text = "" Then
MsgBox ("Please enter your username and password before pressing accept")
'I think this works. It did before I started trying to
'add the loop info. If both fields are blank, then you
'get that message box. Like I said, it should work. I
'don't think that's where the problem is

Else: Open "C:EZ-Accessdatapasswords.txt" For Input As #1
'This just opens the file if something has been
'entered so the loop can look at the info
Do While Not EOF(1)
'tells the loop to go until it hits the end of the file
ReDim Preserve strUN(iCount)
ReDim Preserve strPW(iCount)
'SHOULD increment the dynamic arrays by 1. This was
'a suggestion by another person so I don't know if
'it has anything to do with it or not.
Input #1, strUN(iCount), strPW(iCount)
'I think this is where my problem is. It should be
'defining the variable strUN(iCount) as the information
'before the , and defining the variable strPW(iCount)
'as the informationi after the , in the passwords.txt file
'That's the format of the info. See for yourself

If txtUserName = strUN(iCount) Then
If txtPassword = strPW(iCount) Then
itrue = 1
'This SHOULD mean that if what the user entered in
'both txtUserName and txtPassword are what the loop
'found and placed in those variables from the file,
'then the loop will stop.
strUser = txtUserName.Text
'Simply stores the Username for following screens.
'for textboxes and lists and whatnots.
frmStart.Show
Unload Me
'If match is made, then it will show the next form
'and hide this one. Duh
istaff = 1
ivehicles = 1
ireports = 1
'Once again, suggestion from friend that this is why my
'code doesn't work. I think it's all B.S. but I left it
End If
End If

iCount = iCount + 1
'Increment counter by 1
Loop
Close #1
'Close passwords.txt after reading
If itrue = 0 Then
MsgBox ("Password or username incorrect - please re-enter")
'If no match has been found in passwords.txt for the username
'or password entered by the user, the above message pops up
'to advise them of this. They can then have another go at it.
txtUser.Text = ""
txtPass.Text = ""
txtUser.SetFocus
'Set form to original state for re-entry of data
Else
End If
End If
End Sub
'And that's it. Please take a look and see if you can get
'something to work. Thanks

Speech Feature
ok, let's say i have a variable called "name"
what can i do so make the computer say it out loud using the speech feature

VB FormatCurrency Feature
I am a novice trying to learn VB. I am writing a program to print out a simplified bill for a repair shop. I have developed code to 1) calculate hours of labor * 35 dollar (hourly labor charge) (text box) and 2) calculate costs of parts and supplier + 5% (sales tax) (text box) . When I click the command button to run or display the labor, parts, and total costs what is displayed in my picture box is not in the currency format nor is it lined up (right justified). Does anyone know how what code I should use for this? Thanks much in advance.

Need Help With A Program Feature
I am making a cash register program. The register is supposed to be similar to those in fast food restaurants. I want to have the effect that when the user clicks on a menu item, the button for that item will change to a color when pressed down, and then change back to its original color when the employee's "finger" is off of it.

The "employee" is just a vitual one. As I said, when the user clicks on a menu item, the button for that item is pushed down, changes color, and then comes back up, and changes back to the original color.

How could I go about doing this?

Run Once Feature Continued
Ok guys, sorry for dbl posting, but it wasnt anywhere on the list anymore because I thought it was taken care of, but I cant get my program to work. I need it to run a form once, and then never run it again unless formatted or registry values deleted or changed.
I have this so far on my splash page

Code:
data = Getsetting("bla","bla","bla", "0")
If data = 0 then
runonce.show
me.hide
end if
And on Run once, once they enter the info:

Code:
Savesetting "bla","bla",bla", "1"
For some reason its not working

Viperchief

Using Find Feature
Is there a way to set up a find feature available via right clicking on a control? That is to say, I have a control that contains the names of projects. It is a combo box that finds the record according to the project selected. I would like the user to be able to right click this field and have find or search available.

Can this be done? If not, what is the easiest way to accomplish my find needs?

Thanks in advance.
Scott

Search Feature
This is the last problem i have with my program then it will be complete

In my program i havea dearch feature that searches though a database, that part works. The only problem is that is has to be the exact match of what is stored in the database i am wanting it so that if you type in 007, it will bring up all of the records that have 007 in it.

look at the program to see exactly what i mean

Log In, User Feature
I am creating a political simulation game where I would like a login feature. I no the basics of a login feature but I do not know how to have multiple users and a "register" feature (like register a new account). I hope someone can help. Thanks in advance.

Export Feature
I have a module that exports data out of my access database in a text file. Now i wnat to run this module from my visual basic form.. the problem is i dont knwo where to place it and how to connect to the database. basically i wnat to select all records from my database and export them into a csv file.. i placed below sample cod eim working with thanks for any help
i dont know how to make the connection to the access database through the module?


Module
Private Type udtCFR
CFR_FORMTYPE As String * 1
CFR_RECEIVEDATE As String * 8
CFR_CLIENTCODE As String * 3


End Type

Dim recCFR As udtCFR

Public Sub exportCFR2()

On Error Resume Next

Dim sExportFolder, sExportFileName As String
Dim lRecNum As Long
Dim dbs As Database
Dim qdf As QueryDef
Dim rst As Recordset
Dim strSQL As String
Dim CommonDialog1 As String
sExportFolder = "C:"
sExportFileName = InputBox(Prompt:="Enter the name of CFR file you would like to export")
lRecNum = 0



Open sExportFolder & sExportFileName For Output As #1
If Err = 55 Then
Close #1
Err.Clear
End If
If Err <> 0 Then

Close #1

Exit Sub
End If

Close #1
On Error GoTo 0
Open sExportFolder & sExportFileName For Random As #1 Len = Len(recCFR)
If Err <> 0 Then
MsgBox ("CFR Export File can not be created- Open err=" & _
Err.Number & ":" & Err.Description & " - notify IT immediately")
Exit Sub
End If
Set dbs = CurrentDb

strSQL = "SELECT * FROM CFR;"
Set rst = dbs.OpenRecordset(strSQL)

' Construct SQL statement including parameters.



Do While Not rst.EOF

InitCFR

recCFR.CFR_FORMTYPE = rst!CFR_FORMTYPE
recCFR.CFR_RECEIVEDATE = Nz(rst!CFR_RECEIVEDATE, " ")
recCFR.CFR_CLIENTCODE = Nz(rst!CFR_CLIENTCODE, " ")



lRecNum = lRecNum + 1
Put #1, lRecNum, recCFR
If Err <> 0 Then
MsgBox ("CFR Export File Write err=" & _
Err.Number & ":" & Err.Description & " - notify IT immediately")
Close #1
Exit Sub
End If
rst.MoveNext
Loop

rst.Close
Set dbs = Nothing

MsgBox ("Export complete - " & lRecNum & " records written to " & sExportFolder & sExportFileName)

End Sub

Do Not Ask Again Feature In MsgBox
I have a button that is supposed to close my program. When you click the button a msgbox will come up that asks for confirmation, however I would like to add a check mark that says "Do not ask me again" which will prompt the msgbox not to appear the next time that the button is clicked how can I do this?

Here is what I have so far,


Code:
Private Sub Command1_Click()
Select Case MsgBox("Do you really wish to quit this program?", vbOKCancel + vbQuestion, "Confirmation")
Case vbOK
Unload Me
End Select
End Sub

Reseting Tip Of Day Feature
After trying to spice up the second release of one of my tools, I thought i'd insert a tip of the day feature. I had everything working fine, until I tested the (don't show tips again) feature. Now this causes the program to crash. But more strange, is I am not sure how to un-check that option now. Looking in the generic tip form, I see::

' save whether or not this form should be displayed at startup
SaveSetting App.EXEName, "Options", "Show Tips at Startup", chkLoadTipsAtStartup.Value

But with my newbiness to visual basic, I'm not sure exactly where this check has been stored. Is it in the windows registry?

VScroll Feature
Does anyone know how to use the "vScroll" bar?

I have an "ssTab" control with two tabs and inside one of the tabs I'm going to have quite a few textboxes. I'm going to need to scroll through these textboxes using a vertical scroll bar.

I've added the scrollbar to the form but I haven't the foggiest clue how to make it work!

Help With Key_Press Feature, Please
Ok, so I have a pretty amatuer program that is very close to being finished. The next feature I wish to implament would be to press the ENTER key in a text box and have it automaticaly press a Command Button in the program. I know that I can do this, but how?

Here's my code, if it helps at all...


Code:
Private Sub Command1_Click()
Text6.Text = Text5.Text - Text1.Text
Text7.Text = Text3.Text
Text8.Text = (Text1.Text + Val(Text2.Text) + Val(Text3.Text) + Val(Text4.Text) + Val(Text5.Text)) / "5"
End Sub

Private Sub Command2_Click()
Text6.Text = Text5.Text - Text1.Text
End Sub

Private Sub Command3_Click()
Text7.Text = Text3.Text
End Sub

Private Sub Command4_Click()
Text8.Text = Text1.Text + Val(Text2.Text) + Val(Text3.Text) + Val(Text4.Text) + Val(Text5.Text) / "5"
End Sub

Private Sub Command5_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Text8.Text = ""
Text9.Text = ""
End Sub


Private Sub Text1_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Text8.Text = ""
Text9.Text = ""
End Sub

Private Sub Text2_Click()
Text2.Text = ""
End Sub

Private Sub Text3_Click()
Text3.Text = ""
End Sub

Private Sub Text4_Click()
Text4.Text = ""
End Sub

Private Sub Text5_Click()
Text5.Text = ""
End Sub

Private Sub Text6_Click()
Text6.Text = ""
End Sub

Private Sub Text7_Click()
Text7.Text = ""
End Sub

Private Sub Text8_Click()
Text8.Text = ""
End Sub

Private Sub Text9_Click()
Text9.Text = ""
End Sub

What I want is for after you are done with inputting a number into the fith text box, I want the user to click ENTER and have it click the first command button.
Thanks!

Help Implementing Feature
This is a chat programming using winsock. Here is the following code for the entire program. It consists of 3 forms and a module containing global variables.

What i WANT to do is create a 'handle list' on the side of the program which will display all of the currently connected handles in a text box.

frmStart
Code:

Private Sub SetAddress()
gPort = txtPort.Text
gIPAddress = txtIPAddress.Text
End Sub

Private Sub cmdClient_Click()
Call SetAddress
frmClient.Show
Unload Me
End Sub

Private Sub cmdServer_Click()
Call SetAddress
frmServer.Show
Unload Me
End Sub


frmServer

Code:
Private Sub sktConnection_Close(Index As Integer)
' Announce the new departure
AddToTotalIncoming (gHandles(Index) & " just left")

'close the connection
sktConnection(Index).Close

End Sub

Private Sub sktConnection_ConnectionRequest(Index As Integer, ByVal requestID As Long)

' Now accept the new connection
'A connection was requested from the server.

Dim i As Integer
Dim iConnection As Integer

'Make sure this is control 0 in the array.
'This is the only one that can accept connections.
If Index = 0 Then

'Search for available Winsock control.
For i = 1 To gNumConnections
If sktConnection(i).State = sckClosed Then
iConnection = i
Exit For
End If
Next i

'If none was found, create a new one.
If iConnection = 0 Then

' Tell the world there's a new connection
gNumConnections = gNumConnections + 1

'Load a new Winsock control for this connection.
Load sktConnection(gNumConnections)

' This connection needs a handle
ReDim Preserve gHandles(gNumConnections) As String
ReDim Preserve gSentYN(gNumConnections) As Boolean
ReDim Preserve gMessages(gNumConnections) As String

' Catch this user up on the previous conversation
' This way they don't get resent the chat session to date
gMessages(gNumConnections) = gTotalincoming

' set their handle
gHandles(gNumConnections) = "unknown"

' Add to the servers connections
lblActiveConnections.Caption = gNumConnections & " Active Connections"

'Control to be used is this new control.
iConnection = gNumConnections
End If

'Set port for this control to 0. (Randomly assigns an available port.)
sktConnection(iConnection).LocalPort = 0

'Have this control accept the connection.
sktConnection(iConnection).Accept requestID

' Send the welcome message
sktConnection(iConnection).SendData "Welcome to the Spyderpop Chat Room, enter your handle and then click SEND. "
End If

End Sub

Private Sub sktConnection_DataArrival(Index As Integer, ByVal bytesTotal As Long)
'Data has arrived at the server from an open connection.
Dim newdata As String

'Get the data.
sktConnection(Index).GetData newdata

If gHandles(Index) = "unknown" Then

' Store it internally
gHandles(Index) = newdata

' Announce the new arrival
AddToTotalIncoming (newdata & " just joined")
Else
'Pass the index of the connection from which the data came.
AddToTotalIncoming (gHandles(Index) & ":: " & newdata)
End If

End Sub

Private Sub sktConnection_Error(Index As Integer, ByVal Number As Integer, Description As String, ByVal Scode As Long, ByVal Source As String, ByVal HelpFile As String, ByVal HelpContext As Long, CancelDisplay As Boolean)
' this should handle all errors in the server world
AddToServerLog ("Socket error on #" & Index & " " & Description)
End Sub

Private Sub tmServerTimer_Timer()
txtTotalIncoming.Text = gTotalincoming

'Send the new data to the group
Call BroadcastMessage

End Sub

Private Sub BroadcastMessage()
Dim i
Dim myMessage As String
Dim conn_index As Integer

' Set the default connection index
conn_index = -1

' Loop through all connections excluding the servers
' Hence we start at 1
For i = 1 To gNumConnections
' if this connection has not had an update then
If gSentYN(i) = False And sktConnection(i).State = sckConnected Then
' Get the message we need to deliver
myMessage = Left(gTotalincoming, Len(gTotalincoming) - Len(gMessages(i)))
' update the message store for this user
gMessages(i) = gTotalincoming
' Get the index of this connection
conn_index = i
Exit For
'Else
' gSentYN(i) = True
End If
Next i

' This is so we know to
' send the data to everyone
If conn_index = -1 Then
For i = 1 To gNumConnections
gSentYN(i) = False
Next
End If

If conn_index > -1 Then

' check the connection's open
If sktConnection(conn_index).State = sckConnected Then

' send the data
sktConnection(conn_index).SendData myMessage

'signal that we've sent to this user
gSentYN(conn_index) = True

End If

End If

End Sub


frmClient

Code:
Private Sub Form_Load()

' Initiate the connection to the server
sktClient.RemoteHost = gIPAddress
sktClient.RemotePort = gPort

Call AddToOutput(vbNewLine & "Connecting on " & gIPAddress & ", port " & gPort & vbNewLine)

' Connect to the server
sktClient.Connect

' Reset my handle
myName = "unknown"

End Sub

Private Sub mnuAbout_Click()
Dim l0064 As Variant
l0064 = "This program was created by Christopher Gillis. ::Spyderpop:: (C)2004"
MsgBox l0064
End Sub

Private Sub mnuQuit_Click()
Unload Me
End Sub

Private Sub sktClient_DataArrival(ByVal bytesTotal As Long)

Dim newdata As String

' Get the arriving data and print it out.
sktClient.GetData newdata

' add the data to the output
txtOutput.Text = newdata & txtOutput.Text

End Sub

Private Sub sktClient_Error(ByVal Number As Integer, Description As String, ByVal Scode As Long, ByVal Source As String, ByVal HelpFile As String, ByVal HelpContext As Long, CancelDisplay As Boolean)
' This should handle any winsock errors.
Call AddToOutput("Error: " & Description)
End Sub



and the module:


Code:
Public gPort As Integer
Public gIPAddress As String
Public gTotalincoming As String
Public gServerLog As String
Public gNumConnections As Long



Public Sub AddToTotalIncoming(additional_text As String)

gTotalincoming = additional_text & vbNewLine & gTotalincoming

End Sub
Public Sub AddToServerLog(additional_text As String)

gServerLog = additional_text & vbNewLine & gServerLog

End Sub

Also, I would like to implement a way to change your handle.

I would appreciate any input. Thank you very much for your time.


EDIT: I will post pictures necessary.

frmStart - http://www.angelfire.com/ab7/spydr/untitled.gif
frmServer - http://www.angelfire.com/ab7/spydr/untitled1.gif
frmClient - http://www.angelfire.com/ab7/spydr/untitled2.gif

EDIT2: Can an Admin please move this to the appropriate forum. Sorry, but i did not see the 'internet development' forum. Thank you.

Search Feature
Is their easy way to implement a search feature, like in notepad where you type in a piece of text and it searches for it? Like is their some kind of control for doing it? Like common dialog thing?

Messenger Feature
Can i add a popup window(Like messenger) in my programme..from systray

Uninstall Feature
I want to give a shortcut or option to Uninstall my project from
users machine. User need not to go to Control Panel to unistall.

Update Feature
What would be the easist way to make my program update itself? like download a new myapp.exe if it knows there is a new version out?

Autocomplete Feature
In a previous post it was mentioned that you have to code the "Autocomplete" feature for a combo box.

Does anyone have this code? I am too new to VB to even now where to start.

Thank you

Time Out Feature
Hai! Everybody





I am in urgent need of a solution for this.
=0Please advise.





Problem :


I am opening Internet Explorer though VB by giving names of various portals in a list box.


I want to st a time out feature such that if no activity is performed on that portal or a particular period of time, then it should time out.


I think thatthe activity should be in terms of bytes being transferred or you can thin of any other also.





Please advise as early as possible as the te time is very short with me.





Thanks in advance





Sushnt

Combo Box Feature
Hi,

I am trying to develope a program using VB 6 and I found from other application a feature of combo box that will highlight a kind of table when we click the combo box arrow.
Dows anybody know which component or reference I have to add in to my VB IDE, since the combo box appeared in my toolbar doesn't have such feature. Sorry I am quite in VB 6

Thanks so much for your helps/advice.

regards,

Paulus

Update Feature Of Sql
I'm having trouble using the update feature of sql. I have several text
boxes full of information including: txtFName, txtLName, txtAddr, etc. My
key field is CustID and I am attempting to load or rewrite according to that
number. I have gotten the program to load the old material from the
database into the text boxes. However, I cannot get my program to write the
updated information to the database. Any help would be appreciated.

Check Box Feature
Can someone give me some advice.

i currently have.

Private Sub load()
Dim i As Integer

 
lst.AddItem "1 "
lst.AddItem "6 "
lst.AddItem "7 "
lst.AddItem "8 "
lst.AddItem "9 "

lst.Selected(0) = True

End Sub


I only want to allow the user to select one of the items, it defaults to item 1, but if the user selects another item, i only want that other item selected not the one that was previously selected.  I dont see a property that would allow for only one selection at a time.

is this possible.????


VBMorton

AutoSave Feature For VB6?
Anyone know of an add in or tool that will auto save my projects defined by time. I am basically looking for the same thing as Word has but for VB6. Thanks in advance.

My Kazaa Like Feature
If you have ever used Kazaa you probley know about My Kazaa (where they list the files in the directory you specify). I want to do that same thing in my program. It's kinda like a exel layout that lists the files. What control would I use to list the files and how would I list the files in a directory??

Thanx,
Ben

Search Feature
Over the past 2 days I have not been able to search the Board.
I get an error about too much time before a return(timed out error)
I did recently clear my browser cookies, history ... etc.
Is everyone else experiencing this ?
Michael

Note Feature?
Ok, another question,
Is there a feature on VB 6.0 that allows you to make notations about things that you need to fix in the future on a project (similar possibly to the MS Front Page notes function)?

Curious.

Joshua Wise

Autocomplete Feature
How can auto-complete feature (for a text box) be incorporated in VB. ie; suppose i type CO in text box, it should list all letters starting with CO below the text box (like codegure,colorado,compass etc...) so that i can select one from it instead of typing the whole thing. I am using VB+SQL server

thanks
bhavesh

Autoupdate Feature
Has anyone ever written an autoupdate feature? I mean when the program starts, it checks a specific location for a new version and if one is available it downloads the components and installs them automatically.

Does anyone have some sample sourcecode? Or does anyone know how I can programatically register components?

There is another problem: While the program is running, I cant access its dlls because they are in use. So how can I overwrite them?

Thanks for all input,

Daniel

Rubberband Like Feature In A Picture Box
Hello Guys,
Im want to create a line by clicking two points on a picturebox. I would like to obtain a rubberbanding feature where a line is drawn tailing the mouse pointer after the first point is selected and until the second point is selected.

There are several lines already drawn in my picturebox. I saved the attributes of these lines via UDT.

My first move in obtaining this rubberbanding feature is I used the CLS method and loop through all the items in my UDT and draw them one by one during MouseMove event.

This works nicely, but the picture box flickers a lot while the loop is on going.

Is there a better way of obtaining a rubberband like feature without the flicker?
Is there a picture box property like a Redraw = False which eliminates flicker?

Thanks!

Working On An Import Feature
I am working on an import program to grab data from ACT, or a CSV file, and import it into a database I built. I want the users to be able to map each field from their old database into one of my new fields.

I need some kind of grid, I think, where I can list each field from the old database on the left, and then on the right each field would have a drop down list that would contain all the fields in my database that they could map to. I have attached a picture of the program I am modeling this after.

Nothing I've played with so far will accomplish this. Does anyone know of a grid control, or combination of controls, that would accomplish this effect?

I am open to other suggestions on how to do the interface for the importer as well. If anyone has ACT I am currently modeling it after their import tool. Thanks.

/<evin

Creating A ZOOM Feature
I just found this forum ... what a blessing.

I am trying to create a simple plotting program ... using VB5 ... but can't figure out the whole SCALE thing ... every time I plot the lines, arcs, etc., they come out all wrong ... lines not connected to the arc end points ... it appears either coord system or scale is wrong.

I am trying to draw directly on a form (maybe that's the whole problem) ... and I can get the original plot to come out somewhat correct by playing with the size of the form. I created a ZOOM feature that I can get to explode the designated area, but then all the elements are drawn incorrect ... lines not connected to arcs and all. I'm guessing that exploding the area by changing the SCALE does something to the coord system.

Can someone please explain, in simple terms, how the SCALE and form size and ScaleWidth and ScaleHeight works. I can't seem to make heads or tails out of the on-line stuff.

Thanks a million to anyone whose "listening."

Want To Add A Feature To My Hangman Game
Hi all!

This is probably such a basic question that it belongs in the 'general' forum but I wasn't sure. Here it goes anyway...

I want to add a feature to my hangman game but I can't work out how to do it. Basically, I want to set it up so that the player can keep on playing the game but not get the same word they must guess twice. At the moment I have it set up so the game randomly picks a word from an array of 10 strings. Once the game is finished, then the player can click on the 'play again' button and the game again picks a word at random from the array. What I want it to do is 'remove' each string it picks from the code so that it can't pick that string again. I thought the easiest way to do this would be to add a line to the code to comment out each string as it is picked but this is the part I can't work out how to do!

I'm not sure if I've explained my problem very well, but if anyone thinks they may be able to help but needs more detail then please post and I will try to explain things further. Any other alternate solutions would also be greatly appreciated.

Cheers,

Ste.

Trying To Add Check Printing Feature
Hello,

I'm trying to add a check printing feature to my software but I can't find any code to do so. If anyone can offer me any suggestions on where I could find code to allow me to print checks that would be great.

How Can I Invoke The WAKE ON LAN Feature?
ei guys, it's me again.. i'm just wondering if it's possible to invoke the wake on lan feature that would boot up a system remotely. thanks a lot.

Film Finder Feature
hey im doing an aslevel coursework n need help on creating a feature which searches cinema locations film types ratings n more.....

Look at the cinema workshet and u can see the film finder feature..basically i want to know how or wat i can use to make it work.. i want it to be able to do the following...

1..user can type in the name of a cinema in the 'cinema location' e.g. showcase cinemas or UCI or odeon or warner village..ne of the previous and then click 'GO' and a list of films shud cum up in the list box....

2.or the user can search by name they can type the name of the film and sum how it shud search thorugh the list on data2 worksheet and see which cinema is screening the film.then click 'go' and the information shud cum up in the list box


3.or if they user wants to search for a particular type of film they can choose the genre and also choose the rating then click 'go' and the information shud cum up in the list box

those are the things i want the spreadsheet to do if u have ne ideas on how i cud improve it or make it easier for myself feel free to make suggestions......

thanx

-kix-

How Do You Make A Search Feature?
Hello, I am writing a program and I need to add a search feature. I have looked around and have't been able to find what I'm looking for.

What I want is something the same as the find command in windows xp. With the ability to search within the files for a string of text as well.

Does anyone know how this is made?

User Control With New Feature
Here is the same Abstract TopicList, only this have a new feature, the TopicList object have a new propety INDEX, this is very usesful in the TopicChecked event.

Webserver Sub-Domain Feature Help!
hi, i've greated my own Winapache WebServer and its great. No problems with it. Is what I want to do now is add a sub-domain feature, is it possible? can it be done? can you help me?

If so please do, your help will be most greatful


Many Thanks
-PCUser

Code Completion Feature
Hi,

I am using the CodeMax control which I am sure many of you know it is a very powerful code editing control. However, I am creating a web editor similar to Visual InterDev 6.0 However, I have got everything done like the code completion list box which pops up when you type things such as "Reponse" and then a "." (dot) and lists all sub methods and properties. However, I finding some trouble getting the list box to display just under the dot that the user types...maybe the CodeMax control can help?

Please help...
Thanks
Visual Developer

Messenger Idle Feature
It seems no one really likes answering questions on messengers, but after searching and finding nothing on it, i'm gonna ask anyways

I want to create a program for yahoo messenger that will make me idle (shows on messenger that i'm idle for X mins ect) but i'm really not. I've tried a google search, forum search, and i've just plain tried to figure it out myself with no luck at all.

I'm open to all ideas/information here.

Copyright © 2005-08 www.BigResource.com, All rights reserved