|
How can I specified the path so that my ini file
can be saved into the current user folder(under Documents and Settings)
in VB6?
|
|
|
|
|
Below is the piece of code that caused the error: I'm new a this language and I cannot see where it is wrong. Thanks for your help.
Public Function newr() As String
Try
Dim dbCommand As OleDbCommand
Dim DBConn As OleDbConnection
Dim DBInsert As New OleDbCommand
Dim strDsc, strVin, strMak, strMod, strEng, strTrn As String
Dim strCol, strTx1, strTx2, strTx3, strTx4, strTx5 As String
Dim strTx6, strPur, strCnt, strCom As String
Dim intYr, intQty, intMil, intPph As Integer
Dim curPrc, curSal As Double
Dim curCst, curFrt, curDet, curLot As Double
Dim curC1, curC2, curC3, curC4, curC5, curC6, curTCt As Double
Dim datPur, datLot As Date
Dim strPath As String
Dim USA As String
strDsc = txtDesc.Text
strVin = txtVin.Text
strMak = txtMake.Text
strMod = txtMod.Text
strEng = txtEngine.Text
strTrn = txtTrans.Text
strCol = txtColor.Text
strTx1 = txtT1.Text
strTx2 = txtT2.Text
strTx3 = txtT3.Text
strTx4 = txtT4.Text
strTx5 = txtT5.Text
'strTx6 = txtT6.Text
strPur = txtPurf.Text
strCnt = txtCont.Text
strCom = txtCom.Text
intPph = CInt(txtPph.Text)
intYr = CInt(txtYear.Text)
intQty = CInt(txtQty.Text)
intMil = CInt(txtMiles.Text)
curPrc = CDbl(txtPrice.Text)
curSal = CDbl(txtSale.Text)
curCst = CDbl(txtCost.Text)
curFrt = CDbl(txtFrt.Text)
curDet = CDbl(txtDetail.Text)
curLot = CDbl(txtLot.Text)
curC1 = CDbl(txtC1.Text)
curC2 = CDbl(txtC2.Text)
curC3 = CDbl(txtC3.Text)
curC4 = CDbl(txtC4.Text)
curC5 = CDbl(txtC5.Text)
'curC6 = txtC6.Text
curTCt = CDbl(txtTCst.Text)
datPur = DateValue(txtPdat.Text)
datLot = DateValue(txtDlot.Text)
USA = "USA"
DBConn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" _
& "DATA SOURCE=" _
& strPath)
DBInsert.CommandText = "Insert Into Equip " _
& "(ADesc, AVin, AMake, AModel, AYear, AColor, AEngine, ATrans, AMiles, AQty, ACost, APrice, AActual, ASale, AFrt, ADetail,ALot, AT1, AT2, AT3, AT4, AT5, AT6, AT7, AT8, AT9, AT0, AC1, AC2, AC3, AC4, AC5, AC6, AC7, AC8, AC9, AC0, APFrom, APDat, APCont, APph, APDLot, ACom, AUSA) " _
& "Values (" _
& "'" & strDsc & "', " _
& "'" & strVin & "', " _
& "'" & strMak & "', " _
& "'" & strMod & "', " _
& "'" & intYr & "', " _
& "'" & strCol & "', " _
& "'" & strEng & "', " _
& "'" & strTrn & "', " _
& "'" & intMil & "', " _
& "'" & intQty & "', " _
& "'" & curCst & "', " _
& "'" & curPrc & "', " _
& "'" & curTCt & "', " _
& "'" & curSal & "', " _
& "'" & curFrt & "', " _
& "'" & curDet & "', " _
& "'" & curLot & "', " _
& "'" & strTx1 & "', " _
& "'" & strTx2 & "', " _
& "'" & strTx3 & "', " _
& "'" & strTx4 & "', " _
& "'" & strTx5 & "', " _
& "'" & strTx6 & "', " _
& "'" & strTx6 & "', " _
& "'" & strTx6 & "', " _
& "'" & strTx6 & "', " _
& "'" & strTx6 & "', " _
& "'" & curC1 & "', " _
& "'" & curC2 & "', " _
& "'" & curC3 & "', " _
& "'" & curC4 & "', " _
& "'" & curC5 & "', " _
& "'" & curC6 & "', " _
& "'" & curC6 & "', " _
& "'" & curC6 & "', " _
& "'" & curC6 & "', " _
& "'" & curC6 & "', " _
& "'" & strPur & "', " _
& "'" & datPur & "', " _
& "'" & strCnt & "', " _
& "'" & intPph & "', " _
& "'" & datLot & "', " _
& "'" & strCom & "', " _
& "'" & USA & "')"
DBInsert.Connection = DBConn
DBInsert.Connection.Open()
DBInsert.ExecuteNonQuery()
DBConn.Close()
txtError.Text = "Saved."
Catch err As System.Exception
txtError.Text = err.Message
End Try
End Function
|
|
|
|
|
:SMACK: And the error is? And on what line?
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Defined the items correctly, then I run it. After I enter data and hit save. I get this error. I was told to recheck the definitaions, which I did and I still get this error. Does anyone now where to look?
|
|
|
|
|
Not without you supplying A LOT more information than this. What are supposed to do with the complete lack of information in your post?
Post a snippet of your code and the error message and we might be able to tell you something helpful.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
I need some help with sending email via MS Outlook, using VB.NET. What I want is for the program to send the email, using the email addess provided by the user and then send the email, without any interaction from the user.
I get it more or less, BUT - everytime MS Outlook gives me a message - 'an program is trying to send an email message, do you want to continue'. How can I overcome this problem - at the end of the day I don't want any interaction between the user and outlook.
Any help will be much appreciated...
|
|
|
|
|
Isnt that an SP2 thing? Its trying to protect the machine against a mail list exploit. I dont think that you would really WANT to turn that off these days. Not with the Netsky crap going on.
|
|
|
|
|
You have to go into Outlook Express to turn this off. You find it under the Tool/Options menus, Security tab. It's not an XP SP2 thing. It's been around for a couple of years now in Outlook.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Dear Dave Kreskowiak,
Thanks a lot for giving quick response. I have very simple its just filecopy command as below
FileCopy Trim(App.Path & "\EyeBallPics.mdb"), Trim(Text1.Text & "\EyeBallPics.mdb")
when i execute this line of code its giving error "Access is denied"
The database is Ms Access 2003
Please help me. your's help will be highly appriciated.
Thanks
|
|
|
|
|
Since you haven't told us WHICH backup program your using, how it is integrated into your application, how your using it to backup your database, what kind of database your using (Access, SQL Server, Oracle, ...), and if your closing all your connections to your database before you attempt to back it up, ...
There's nothing we can tell you to help you!
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
I will not answer email sent directly to me. It's very rude and uninvited.
You must make sure all of your connections to this database are closed and disposed of before you attempt to use a File.Copy on it.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hi there,
In datagrid, how to know which column field is sorted (when user click on the column header of the grid to sort the grid by that column field).
Thanks.
|
|
|
|
|
I readed this article http://www.codeproject.com/vb/net/ProgressStatus.asp
[^] and I liked it very much. I implemented it into one mine simple project.
Now I was wandering hot to delete this progressbar from a statusbar and put a text on its place.
This questo may seem stupid but i'm just starting with .Net (old VB6)
Thanks
MaiO
|
|
|
|
|
Hi,
Can somebody help me on this matter? I want to create a Calendar System like those of the Ms Outlook features but its hard for me to start from scratch. Any third party controls that you can suggest?
A Borland C++ app can incorporate such feature as this using third party. I'm not familiar with C++ either to create the application.
TIA.
|
|
|
|
|
Would it be too much to just use the Outlook objects?
|
|
|
|
|
Go to componentgo.com. There you will find Calendar controls for sale. For around $200, you can get daily, weekly, monthly and resource controls along with the source code which is written in C#.
|
|
|
|
|
I have a Serilazable class and in that class i have made 5 public member and one nonserialized public member. whenever i make an object of that class and do xmlserialization on it it serializes all the 6 members including nonserialized member along with their values why is that. help!!!!!!!!!1
|
|
|
|
|
Since there a few differeny ways of making a class serializable, you'll have to show us your serializable class code in order for us to tell you anything useful.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Is there any way to make it so if you were to launch vb while in powerpoint your userform would run right away, rather than you having to make it run yourself?
|
|
|
|
|
I don't exactly understand what you want to do.
What do you mean by "while in powerpoint"? Are you running a powerpoint presentation or are you creating the presentation?
What is "launch vb"? You mean launch Visual Studio which will automatically bring up a certain form from a project? What do you want to do with it?
Or do you mean that you want to run the program you have created in VB from powerpoint?
|
|
|
|
|
I am new with Card Reader applications, I attached a card reader with my pc, it allows me to catch the stripe info to a textbox on the form. But I need it to capture in a string, so I can play with it and put proper information in proper fields. Can anyone help ?
|
|
|
|
|
If it's in a textbox on your form, you've already got the string. Does the this card reader come with a library or control? How are you getting the data from the card?
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
I didn't install anything, while installing the hardware. XP itself updated the registry. Yeah, when I use the card reader, it populate the text box. But I want to do without text box.. Any suggestions?
|
|
|
|
|
You still haven't answered my question. What TextBox? Where did it come from? Did you put a TextBox control on the form? Is there a component that you are using to get data from the card reader? How did you get a TextBox control on the form that is displaying this data?
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
As a test, I just created new project and add new form to it... .And add normal text box control to the form from tools. Its just a normal text box, no back end programming is assigned to it.
|
|
|
|
|