|
Use Microsoft.Win32.Registry to create a Key and the same one to open it by using its CreateSubKey or OpenSubKey e.g.
Dim reg As Microsoft.Win32.Registry
Dim tmpreg As Microsoft.Win32.RegistryKey
reg.CurrentUser.CreateSubKey("Software\xx\xx\xx\")
As it returns a RegistryKey when you open it use Microsoft.Win32.RegistryKey to get the value or to set the value by using its GetValue or SetValue Properties.
Hope it helps !
AliAmjad(MCP)
First make it Run THEN make it Run Fast.
|
|
|
|
|
Thanks Ali,
But that doesn't seem to help me in solving my problem.
I wanted to find out whether 'Microsoft Office Document Imaging' has been loaded in my system, if loaded then I wanted to retrieve the path where it has been loaded. I found that if it has been loaded then we can get the path from the registry location 'HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrnetVersion\App Paths\mspview.exe'. mspview.exe is the Exe name to the above application and we can find the path to the exe in the sub key 'Path'.I have to search first if the key 'HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrnetVersion\App Paths\mspview.exe' exists or not. then I have to search the sub inside it to get the path. Can you please help me out in solving this problem.
Thanks in advance.
Sekhar 
|
|
|
|
|
I'm using crystal report and vb6. how can i change the connection properties of the crystal report in vb6?
In my crystal report i used stored procedure to create the report. What if i change my database name how can i change the properties in vb6 so i wouldn't change the crystal report anymore. im using ms sql server.
this is my code...
Global crxReport As CRAXDRT.Report
With crxReport.Database.Tables
For intCount = 1 To .Count
.Item(intCount).ConnectionProperties.Item("Data Source") = sServer
.Item(intCount).ConnectionProperties.Item("Initial Catalog") = sDBName_
.Item(intCount).ConnectionProperties.Item("User Id") = sUserName
.Item(intCount).ConnectionProperties.Item("password") = sPassword
Next
End With
the reports are working fine but if i change my database name it doesn't work anymore...
|
|
|
|
|
Is OOPS concept in Visual Basic 6?
Regards,
KK
Ketan K.
|
|
|
|
|
Not really. VB6 is also out of date, unsupported and rubbish. Learn VB.NET instead.
Christian Graus - Microsoft MVP - C++
"also I don't think "TranslateOneToTwoBillion OneHundredAndFortySevenMillion FourHundredAndEightyThreeThousand SixHundredAndFortySeven()" is a very good choice for a function name" - SpacixOne ( offering help to someone who really needed it ) ( spaces added for the benefit of people running at < 1280x1024 )
|
|
|
|
|
"OOPS" is something you say when you have made a mistake. 
VB6 is a procedural programming language with limited support for object oriented programming (OOP).
VB.NET on the other hand is a fully* object oriented language.
* Although some feel that it lacks certain OO features, it more than well meats the criterias for being an object oriented language.
Experience is the sum of all the mistakes you have done.
|
|
|
|
|
when i update a record in the database, the database becomes updated but the oledbdataadapter does not relect this changes until i restart the application. when I deployed the application, the changes do not even reflect even when I restart the application though the updated record appears in the database
this is the code i use to refresh the dataset.
Try
DsAsets1.Clear()
OleDbDataAdapter1.Fill(DsAsets1)
count()
Catch ex As Exception
MsgBox(ex.ToString)
End Try
I am using Ms Access as my database.
David T. Motajo
-- modified at 12:55 Tuesday 6th November, 2007
|
|
|
|
|
Hi David
From the Above Cod, you are Clearing dataset "dsAssets1",
but Filling the dataset "DsAsets1". So check your "s" , where you will the dataset. but if this Dataset was not declared, then VS should tell you that. mybe you have many dataset and the name confused you. show us your code, if it doesnt work after you fix your Spelling Error.
Hope it Helps
Vuyiswa Maseko,
Sorrow is Better than Laughter, it may Sadden your Face, but It sharpens your Understanding
VB.NET/SQL7/2000/2005
http://vuyiswamb.007ihost.com
http://Ecadre.007ihost.com
vuyiswam@tshwane.gov.za
|
|
|
|
|
this is the actual code am using
Try
DsAsets1.Clear()
OleDbDataAdapter1.Fill(DsAsets1)
count()
Catch ex As Exception
MsgBox(ex.ToString)
End Try
|
|
|
|
|
hi
Did you use a wizard to create your adapter, or did create it your self, if so then lem me see the update command of your adapter.
try this and tell me your Error and remember if your table has no Primary key , you can never update the table.
Try
DsAsets1.Clear()
OleDbDataAdapter1.Fill(DsAsets1)
count()
Catch ex As OleDb.OleDbException
MsgBox(ex.Message)
End Try
End Sub
.
And Dont Forget to import the name space like this
Imports System.Data.OleDb
Thanks
Vuyiswa Maseko,
Sorrow is Better than Laughter, it may Sadden your Face, but It sharpens your Understanding
VB.NET/SQL7/2000/2005
http://vuyiswamb.007ihost.com
http://Ecadre.007ihost.com
vuyiswam@tshwane.gov.za
|
|
|
|
|
thanks. I was able to find the solution after visiting many forums.
I used this code to refresh and its now working fine
Conn.Open()
mycmd = "Select * from Asset"
da = New OleDb.OleDbDataAdapter(mycmd, Conn)
da.Fill(dsAsets1, "Asset")
Conn.Close()
I really appreciate your concern. am very grateful.Thanks again.
|
|
|
|
|
You are Welcome
Vuyiswa Maseko,
Sorrow is Better than Laughter, it may Sadden your Face, but It sharpens your Understanding
VB.NET/SQL7/2000/2005
http://vuyiswamb.007ihost.com
http://Ecadre.007ihost.com
vuyiswam@tshwane.gov.za
|
|
|
|
|
Visual Basic 2005:
I have a DataGridView in Last Name sequence.
Is it possible to when a user types the first letter of a last name
that it displays all rows with last names that start with that letter.
When he types the second letter, it displays all records whose last name starts with those 2 letters, etc.?
|
|
|
|
|
furjaw wrote: When he types the second letter, it displays all records whose last name starts with those 2 letters
On text changed event or keyup event, rebind it with filtered data.
|
|
|
|
|
You should offer a "Filter-Textbox" for that.
So the user can see the current filter and edit it.
In Textbox.TextChanged() you can build a valid filter-expression like:
Dim sFilter as String = "LastName like '" & Textbox.Text & "*'"
And pass that String to the BindingSources (I hope you use one) .Filter - property
|
|
|
|
|
I can't believe how well that worked!
Thanks!!!
Below is the code that I ended up with:
If LastNameTextBox.TextLength > 0 Then
PatientBindingSource.Filter = String.Format("LastName Like '" & LastNameTextBox.Text) & "*'"
Else
PatientBindingSource.Filter = String.Empty
End If
|
|
|
|
|
First, let me apologize if this isn't the right place for this.
I've been asked to create an Outlook add-in that will enable me to pop-up a dialog box at the time the "send" button is clicked on an outlook email message. The goal is to confirm the existence of a properly composed subject line.
Can any one point me in the right direction? Perhaps there is a good on-line resource for tapping into the "send" functionality.
My limited skills include VBScript in Visual Studio.
Any assistance is greatly appreciated!!!
John
|
|
|
|
|
Hi,
I currently using textbox in vb.net, I want to save data file to the file path, if i open it, it will not show SaveFileDialog, if not it wil show SaveFileDialog. how can i do?
Socheat
|
|
|
|
|
Could you please rephrase your question/problem? It's not exactly clear what you're trying to do, and, if you have a small chunk of code that you cold post, that'd be helpful too.
Thanks.
|
|
|
|
|
Anyone knows a code for changing Mouse Cursor... e.g. from vbDefault to vbHourglass using vb 2005.... Thanks
|
|
|
|
|
Cursor = Cursors.HourGlass
Something like that
Christian Graus - Microsoft MVP - C++
"also I don't think "TranslateOneToTwoBillion OneHundredAndFortySevenMillion FourHundredAndEightyThreeThousand SixHundredAndFortySeven()" is a very good choice for a function name" - SpacixOne ( offering help to someone who really needed it ) ( spaces added for the benefit of people running at < 1280x1024 )
|
|
|
|
|
Hi all is there anyone who can help I would like to create a util that lets me extract
Name, Email, Contact, Date,
From a .txt file full of differnt data but that does have this information i want (see example) i think this would be a good project for me to learn so i would appreciate it if someone could take me under their wing so to speak so i can learn how i would do this in VB. Many online utils just exract email or one column
example of what in my txt file there is say 500 of these in it
Position: Software Development Support Engineer - Warrington
Location: Warrington, Cheshire
Rate: Benefits
Skills: My market leading client based in the North West is currently
looking for a Software Development Support Engineer to join their team
on a permanent basis. You will be responsible for providing support and
programming expertise to 3rd party suppliers/clients and also work with
internal teams to ensure successful project completion. The ideal
candidate will have excellent customer facing skills and good knowledge
of C++ and knowledge of Symbian, GSM, UMTS or the mobile telecoms
industry would be...
Type: Permanent
Start Date: ASAP
Advertiser: IT Recruitment Regions
Business Type: Test Employment Agency
Contact: Jame Bloggs
Phone: 0141 717 8919
Email: mailto:James.Bloggs.520C0.07D68@mail.jobserve.com
Ref: JA119898
Date: 02/11/2007 09:49:13
Apply Now: http://www.jobserve.com/EC5F94B13EAA96675ZA0E555748F74BF.jsap
Full Job: http://www.jobserve.com/EC5F94B13EAA96675.job
Add to Basket: http://www.jobserve.com/EC5F94B13EAA96675.jsbk
So i would be looking for an ouput of
Name, Email, Phone, Date
James Bloggs,James.Bloggs.520C0.07D68@mail.jobserve.com,0141 717 8919,02/11/07
in CSV format and would also like a count in there as well
hope some can help thanks
|
|
|
|
|
You could use File.ReadAllLines to read the text as a string array then look for strings that start with Name: ( etc ) and parse out the values.
Christian Graus - Microsoft MVP - C++
"also I don't think "TranslateOneToTwoBillion OneHundredAndFortySevenMillion FourHundredAndEightyThreeThousand SixHundredAndFortySeven()" is a very good choice for a function name" - SpacixOne ( offering help to someone who really needed it ) ( spaces added for the benefit of people running at < 1280x1024 )
|
|
|
|
|
I am writing a program to update some of my files that I have on other computers. It is simple and just transfers the files from a cd to a given location. The location is a read-only folder. I need to change this property by using code before I can copy the new file to the location and then return the folder to read only. I already have the code to transfer the folder but I need to code to change the property of the folder from read-only = true to read-only = false. This needs to occur before the file is moved. I do not know where to start so any help will be appreciated.
I have this:
Dim str_ToPath As String = "C:\Folder\myFolder"
Dim str_FromPtath As String = System.IO.Directory.GetCurrenDirectory()
Dim localfile As String = "myfile"
Dim fso, file
' Get handles to folders current location.
fso = CreateObject("Scripting.FileSystemObject")
'Here is where I need the code to check if the folder is read-only or not and
' change if it is read-only. The folder will be the str_ToPath folder.
file = fso.GetFile(str_ToPath + localfile)
' Delete the folder.
file.Delete()
file = fso.GetFile(str_FromPath + localfile)
' Copy the file to correct location.
file.Copy(str_ToPath + localfile)
|
|
|
|
|
ChadYKK wrote: System.IO.Directory.GetCurrenDirectory()
So this is VB.NET ?
ChadYKK wrote: fso = CreateObject("Scripting.FileSystemObject")
Why on earth are you doing this ?
Christian Graus - Microsoft MVP - C++
"also I don't think "TranslateOneToTwoBillion OneHundredAndFortySevenMillion FourHundredAndEightyThreeThousand SixHundredAndFortySeven()" is a very good choice for a function name" - SpacixOne ( offering help to someone who really needed it ) ( spaces added for the benefit of people running at < 1280x1024 )
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
