2,155 Posted Topics
Re: You do not need to use scripting to determine if Outlook is open or not. By using a reference to MS Office objects you can load outlook, see if new mail arrived , minimize/maximize outlook etc. I have used the following code which works fine on 2003, 2007. I have … | |
Re: aValue will be the number of rows to copy and paste. [CODE]Dim iValue As Integer aValue = Worksheets(1).Rows 'It might be Rowcount in place of Rows, not sure. Play with both options.[/CODE] This will now copy row by row and paste it row by row. You can now add code … | |
Re: I do not think the problem Lies with your data but the format the text is added to excell. You can either manualyy change this by right clicking on the cell, select 'Format Cell', select number, or you can do this via code as follows - Reference MS Excell Object … | |
Re: The correct way would be as follow - [CODE]Dim strMyTableName As String strMyTableName = Text1.Text 'Or if you get the string from another form.. 'strMyTableName = frm...Text1.Text rs.Open "SELECT * FROM " & strMyTableName & "", objConnection, adOpenStatic, adLockOptimistic, adCmdText 'Only use the "[]" if your table name has spaces … | |
Re: It seems that the MS ActiveX DataObjects that you referenced in your application is older than that installed on Win7, IF it was installed correctly. First check your references and make sure that the newest data object (2.8 or higher works fine) is selected. If you can not find it … | |
Re: you will be using something like - [CODE]'Either put this in a a open buttons click event or do it when the form loads: Open "C:\path_to_your_file\file_name.txt" For Input as #1 'put this in your next buttons event: Dim temp as String Dim data() As String Do While Eof(1) = 0 … | |
Re: Zebnoon, please read the posting rules. We are not allowed to "Hijack" someone elses posts and raise the dead from there. You have to create your own post and we will gladly assist from there. You are a newbie though, so no harm no foul. As far as your question … | |
Re: Your post is somewhat confusing, especially being in french. I hope that I have assumed the following correctly. Please let me know if not. Firstly I think that a listbox will work much better, because you can control the listbox listindex when adding or deleting data. Look at the code … | |
Re: Your error, "No log file found" will be within your code where you have set a reference (link) to a certain log file. On your development pc it was able to find this log file, because your path was set to it. On your new system the log file either … | |
Re: It seems that the sxs dll refers to a jpeg file called New Splash, which has been removed some or other time.(Trust me, this happens to ALL of us from time to time). By installing a new copy of the dll, will probably not solve your problem, unless it can … | |
Re: Geraldine, First of all, please read the posting rules. I see you are a new member and probably did not know, but we do not use other peoples post to post our own problem. You need to start your own thread and we will help you where we can. It's … | |
Re: Follow the next link - It gives you ALL the help you need AND plenty of sample codes - [URL="http://www.google.co.za/search?sourceid=navclient&aq=1&oq=listview+control+in+vb6&ie=UTF-8&rlz=1T4WZPA_en___ZA340&q=listview+control+in+vb6.0"]http://www.google.co.za/search?sourceid=navclient&aq=1&oq=listview+control+in+vb6&ie=UTF-8&rlz=1T4WZPA_en___ZA340&q=listview+control+in+vb6.0[/URL] | |
Re: Sophie, It seems that you will need SQL Server installed on the remote machine and by using the DTS Com object. Read the link below which gives some sample code as well. It covers DTS (Data Transformation Services) quite in detail. [URL="http://www.devarticles.com/c/a/ASP/Creating-DTS-Packages-With-SQL-Server-2000/"]http://www.devarticles.com/c/a/ASP/Creating-DTS-Packages-With-SQL-Server-2000/[/URL] I hope this helps. | |
Re: Yes, I would think something like - [CODE]Dim Names As String, UserName As String, RealName As String For Names = 0 to YourValue 'From above it seems like 27 UserName = txtUserName.Text 'Or whereever you want the result RealName = txtRealName.Text 'Deal with the username and realname here code Next … | |
Re: Use something like - [CODE]If 5 <> tmpArr Then 'Your error trapping here End If[/CODE] You can also do it as in - [CODE]If Not tmpArr = Value Then 'Value in this case is 5 'Error trapping here End If[/CODE] | |
Re: If I read this correctly, you are talking about using Google maps to search for a certain address, once found zoom in and show the house, am I correct? | |
Re: Yes it is possible. Firstly by copying and pasting using only code. Look at this link - [URL="http://sunxran.wordpress.com/2007/12/15/transferring-data-from-msflexgrid-to-ms-excel-ms-vb-60/"]http://sunxran.wordpress.com/2007/12/15/transferring-data-from-msflexgrid-to-ms-excel-ms-vb-60/[/URL] Or, by adding the data to certain cells and columns etc - [URL="http://www.freevbcode.com/ShowCode.Asp?ID=1112"]http://www.freevbcode.com/ShowCode.Asp?ID=1112[/URL] | |
Re: Assuming you are talking about vb6, use google and search for vb6 student projects. There is literally 1000's coming up under the search. Just choose from there which you like, and good luck... | |
Re: Your connection string seems fine as long as you refer to "App.Path" and then the .mdb. Ensure that the database was installed in the correct path i.e. - C:\Projects\WomCollge\. Also ensure that your data objects was installed and referenced correctly on the user machine, the ISAM part of error. If … | |
Re: And you ALSO need to give us MUCH, MUCH more information. How can we help if we do not even know what you need help on. As Debasisdas said, do not post your link here, just supply some code ar what designs you have. | |
Re: Please read the posting rules at the top of the forum. We do not mind helping you at all, but at least show some effort from your side too. What have you designed or coded to date? Are you receiving errors and where? We will most certainly not carry out … | |
Re: Please see my reply at your new post. Their is a link posted that gives you the exact code for achieving this. | |
Re: Just use the package and deployment wizard within vb6. Click on Add Ins on your tools menu, if it does not appear there, select the Addin manager and activate from there. The wizard will do all the compiling etc. for you. Sorry Abu, as I posted your reply came up … | |
Re: NOW, before vb5 is on my back and tell me how ashamed I should be... hahahaha, his code is correct, but I have received errors previously with his solution. I normally use the following which has never genereated errors before, assuming that the text entered is numerical - [CODE]Text4.Text = … | |
Re: Taking it that you are refering to VB6, it is a bit more involved. The following works for Vista as well, not sure on 7 though. - [CODE]Private Const MAX_USERNAME As Long = 15 Private Declare Function GetUserName Lib "advapi32" _ Alias "GetUserNameA" _ (ByVal lpBuffer As String, _ nSize … | |
Re: Yes you can read from a text file if the textbox is referenced. In your function you will have something like - [CODE]Private Function CalculateHours (txtReadFrom As Textbox) GetTheHours = txtReadFrom.Text 'And all other codes... End Function Private Sub Command1_Click CalculateHours Text1 'Text1 is the actual textbox on your form … | |
Re: I personally find the loop prone to many errors. This is what I should have done. To a form add a Listbox - lstDate, 2 Textboxes - txtFrom and txtTo, a Monthviewer - MonthViewer1 and a commandbutton - Command1. Add the following code to the code section - [CODE]Private Sub … | |
Re: You need to specify in which column to add the text. Try and use - [CODE]MSFlexGrid1.Columns(x).Text = Readline1.Text 'You will have to code the value of column x, or just use as you had i.e. 0, 2, 3[/CODE] | |
Re: Use your f_Date and t_Date values to get data into the report and not the DatePicker value - [CODE]Dim f_date As Date Dim t_date As Date f_date = Trim(Format(DTPicker1.Day, "00")) + "/" + Trim(Format(DTPicker1.Month, "00")) + "/" + Trim(Format(DTPicker1.Year, "00")) t_date = Trim(Format(DTPicker2.Day, "00")) + "/" + Trim(Format(DTPicker2.Month, "00")) + … | |
Re: First of all you will need the actual connection string to be 100% correct. This can be found on - [URL="http://www.connectionstrings.com/sql-server-2008"]http://www.connectionstrings.com/sql-server-2008[/URL] This will be the Sql Server forum page with hundreds of code samples - [URL="http://www.codeplex.com/wikipage?ProjectName=SqlServerSamples"]http://www.codeplex.com/wikipage?ProjectName=SqlServerSamples[/URL] You can then troubleshoot ALL your connection and errors from the following. There are … | |
Re: It obviously all depends on your knowledge and skills, which language and database source you will be using etc. What constitutes 3 weeks for some of us, might mean 3 months to others, again all depends on the capabilities of the developer. I have noticed that a library or school … | |
Re: Attached plain and basic code. This will set you on the correct path. Please submit if this helped or if answered. | |
Re: If I understand this correctly, you need to determine WHICH excell file is open and then act upon that? If so you can use the following - [CODE]Dim ExcelOpen As Excel.Application On Error Resume Next Set ExcelOpen = GetObject(, "Excel.Application") 'This can be done with any of MS Office's applications … | |
Re: You will have to use the file functions, there are plenty on google etc - "create a file in vb6" etc. Then find out if a current file exist,if yes, copy its content into another file, delete the old file "test.txt" and save the new file with the new name … | |
Re: The best way in getting the data loaded to your combo box is to write a function and then call it every time you need to re-load the data "refresh data". You will use something like - [CODE]Private Function LoadMyData() Set rsLoadMyData = New ADODB.Recordset rsLoadMyData.Open "SELECT MyChosenFieldToLoad FROM MyDataTable", … | |
Re: It seems that the date was saved incorrectly to your Access database in the first place. You need to check the way the data gets saved in Access. To ensure that it is correct, use a syntax like - [CODE]YourDateTextBox.Text = Format(Date, "dd/mm/yyyy")[/CODE] When you retrieve the date you will … | |
Re: First of all, you are using a datacontrol to handle all your data requirements. I personally would have used ADO etc, where you can specify [CODE]App.Path[/CODE]. Currently you have your database in your F: drive. Make sure that when you are running your app, the database is in the same … | |
Re: When you create the field that must hold the photo in Access, create it as 'Binary'. So, when you are saving the picture you will have something like - [CODE]rsPhoto!MyPhoto = Picture1.Picture rsPhoto.Update 'When loading photo ---> Picture1.Picture = rsPhoto!MyPhoto[/CODE] I hope this will help you out. | |
Re: Normally I would not help with sample code if NOTHING has been given, but hey, what the heck.... Please give us MORE info next time, like what YOU have coded so far etc. Look at the attached for a sample... | |
Re: Why don't you send us some code that you have already done and we will gladly try and help. | |
Re: As Debasisdas said, open a sub main procedure - [CODE]Public Sub Main () Load Form1 Form1.Show End Sub[/CODE] This will be in a module within your application. In your Form1>load event you will have - [CODE]Timer1.Enabled = True[/CODE] I hope this helps. | |
Re: Change the font name to 'Garamond' and the size to 6. This is probably the best READABLE font with only 6 points font size. If the long name still does not fit, you will either have to word wrap the text, which will increase your textbox size in height. This … | |
Re: Well, first of all, open a vb6 project, select Active X and start coding. Once you have created the control, click on 'File', 'Make .exe'. This will create the .ocx for you in the directory you have chosen. Copy this .ocx, paste it into Windows System/System 32. Click on start, … | |
Re: If not solved yet, this is what I could pick up. Your value returned from the grid looks fine, although you do not have to specify the return as a value "Val()". Your select statement is incorrect though. This might be where the error gets triggered. [CODE]datLoggedEntry.RecordSource = "Select * … | |
Re: I have picked up a few mistakes in your query. As Jhai and dsp said, that will solve 2 problems. Your date values are also incorrect. Use - [CODE]... WHERE DateValue(YourStartDate) AND DateValue(YourEndDate)[/CODE] I found it much easier to use a SQL writer application to solve my more involved queries. … | |
Re: Use the following link, download the active X and install. After installation, it comes with vb6 sample codes etc. It worked fine for me, so try it. [URL="http://www.sharewareconnection.com/priore-smartcard-activex.htm"]http://www.sharewareconnection.com/priore-smartcard-activex.htm[/URL] | |
Re: Read the following - It shows you sample code as well if you need to recall some data from memory. [URL="http://www.devx.com/vb2themax/Tip/18268"]http://www.devx.com/vb2themax/Tip/18268[/URL] | |
Re: Kinwang gave you the solution. The only thing to add is when you need the return value from Access - [CODE]If Rs!Admin = True Then Check1.Value = 1 Else Check1.Value = 0 End if[/CODE] | |
Re: Jemz, I am confused. You want to password protect your .mdb database so any user can NOT open it. Why would you then want to give any user any priveleges on opening the database? You will need administration privileges and the password to open the database OR to protect it. … | |
Re: This is something I did a while ago for another poster on Daniweb. It works fine, although there is not much comments added, self explanotory. |
The End.