lolafuertes

Is not ususal to have those large 'wait times' for insert. Many things can happen. I've got this problem on a machine that has a raid 5 disk failing and a bad sector in another disk of the raid5, so, when trying to write in the disk it took more …

The UI. The Lessons. The Questions. The Answers. The Answer Explanations. The GoNext. The GoPrevious. The GoToCurrentLesson. The SaveCurrent. The SaveScore. The LoadCurrent. The LoadLesson. The LoadAnswer. The LoadAnswerExplanation. And other you can add. Hope this helps.

ADO is part of the Visual Studio runtime and you don't need to buy it separately Hope this helps

Just curious, do you use "D:\\" or D:\" to access to the root directory of drive?

maybe you can try to change your query to some thing like:[CODE]select MAX(payrolldate) AS [payrolldate], dateadd(dd, 7 - DATEPART(weekday,MAX(payrolldate)), MAX(payrolldate)) AS [Sunday] from payroll where payrollran = 'no'[/CODE] The hint here is that datepart returns the week day(1 to 7). The return value depends on the value that is set …

Just be aware that this works only on NTFS drives. And never on removable drives. Hope this helps

Usually to create the code you are trying to sell you used Visula studio /Visual Basic to develop it. Do you own a demo/free version of Visual Strudio/Visual Basic or you brought it somewhere?

You need to split the functionality in grdScroll like:[CODE]Public Sub grdScroll(ByVal sender As Object, ByVal e As System.Windows.Forms.ScrollEventArgs) Dim RowIndex As Integer = grdAccountTypes.CurrentRow.Index + e.NewValue SelectNewRow(RowIndex) End Sub Public Sub SelectNewRow(Byval RowIndex as Integer) If grdAccountTypes.RowCount = 0 Then ' if no row exist right now MessageBox.Show("No row existed …

Maybe you can try some thing like: [CODE]Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Static iPassCount as Integer ' thiss will assure that the counter is visible only locally but not lost from call to call If TextBox1.Text = "students" And TextBox2.Text = "amaer" Then …

Please verify if: 1) Your router is DHCP enabled 2) You need a password to connect to the router 3) Your wireless connection manager in your computer is the one supplied with Vista, not the one supplied by the wireless card manufacturer Hope this helps

You need to define wich menus/forms/functionalities should be permitted to each access level. Also you need todefine a config file or DB table where to relate each username to the corresponding access level. You need to create a function to retrieve the actual access level of the identified user. On …

Can you put the piece of code and signal the line where you get the error?

Please, be so kind to confirm: 1) Disk C: has been NTFS formatted 2) The folder C:\DailyLog exists 3) The user running the application has Modify permission to this folder and almost Read permissions on C:\ 4) The file C:\DailyLog\logo.gif does not exist before saving Thanks in advance

I suggest to change your loop a little bit to find when the suplied value is less than the upper limit of the segment: [CODE]Do Until intSubScript = intPoints.Length _ OrElse intSearchForPoints [COLOR="Red"]<[/COLOR] intPoints(intSubScript) intSubScript = intSubScript + 1 Loop [/CODE] Then to obtain the 'previous' grade [CODE]If intSubScript [COLOR="Red"]<=[/COLOR] …

On the where clause of the select statement you can write some thing like. WHERE name LIKE 'F*' Hope this helps

Or just put the image in the .Image property of the button and clean the .text. Resize the button to the image size. Hope this helps

IMO, maybe enough to put paper sized A5 (for half) or A6 (quarter) and configure this the default paper size on the printer. Hope this helps

Is it possible to create a new connection once the current is lost? If so, catch the exection event, close the current and try a new connection. Hope this helps.

In VB you can: 1) Read the entire file into an string like Dim ReadBuffer as String = System.IO.File.ReadAllText("C:\SourceFolder\sourceFile.txt") 2) Split the string into words using the split function like Dim W As String() = B.Split({" "c, "."c, ","c}) Maybe you need to pass more separators between the brackets 3)Create …

I use 5 CISCO 1131 AG since 2 years ago running 24/7 with no problems. They are configured to use IPSEC and Radius, and to exchange keys every few seconds to encript the WiFi transmission because security is a must.

The * came because the pinged address does not answers to the ECHO command. This way, many routers or destination addresses are hidden and reduce the exposition to a DOS attack. By IP design, when you reply to an ECHO, you 'shoud' receive an AK as the ECHO originator has …

Maybe you need to do some changes: 1) In the patientTreatments table, be sure to include a PatiendId field in order to identify the treatements by patien Id. (this field is not shown in your coding). From now on, I'll assume that PatienId is numeric. 2) On the load_list() sub, …

You can simulate a router using your PC with some server or professional version of windows or using Linux, while putting more than one lan card (10$ each) in the PC. Better if you can find almost 3 PCs, old, cheap (max 100$), to do it. And of course 2 …

Please post your code written so far to analyze and try to help.

You can change every assignement by using the IIF(test, true_part, false_part) function:[CODE]Formreceipt.Label1.Text = IIF(lvlist2.Items.Count > 0, lvlist2.Items(0).SubItems(1).Text, "") Formreceipt.Label1.Text = IIF(lvlist2.Items.Count > 1, lvlist2.Items(1).SubItems(1).Text, "") Formreceipt.Label1.Text = IIF(lvlist2.Items.Count > 2, lvlist2.Items(2).SubItems(1).Text, "") ' ' etc. ' . . [/CODE] Hope this helps

As far as I know, ACCESS does not support the bulk insert sentence you write. Please read [url]http://www.codeproject.com/KB/database/BulkRecordInsertAccess.aspx[/url] having an example and the sources on how to do a bulk insert into ACCESS. Hope this helps

You can change the select to reflect the new column like [CODE]Dim sql As String = "SELECT *, Left(ETB.[SalesGroup],3) AS SG FROM(ETB) WHERE (((ETB.[SENT])>=# " & startDate.Date & " # And (ETB.[SENT])<= # " & endDate.Date & "#))"[/CODE] Hope this helps

I would suggest the following changes (in red): [CODE]Public Class Form1 Private Sub btnCalculate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCalculate.Click Dim decBaseFee As Decimal Const decDiscount As Decimal = [COLOR="red"]0.8D[/COLOR] Dim decTotalFee As Decimal Dim intHoursUsed As Integer If Not Integer.TryParse(txtHoursUsed.Text, intHoursUsed) Then MessageBox.Show("The number of hours …

I will try the following: 1) Mount the disc as secondary in another PC 2) Fully scan it vith a current antivirus. 3) Run a CHKDSK /R on it to find any error an repair (if possible) 4) On the original PC verify if it runs now 5) If not, …

Inorder to reflect the added items try [CODE]Public Sub SetStatus(txt as string) as string lstStatus.Items.add(txt) lstStatus.Refresh System.Windows.Forms.Application.Doevents() ' gives time to refresh the screen End Sub[/CODE] Hope this helps

Just be carefull when operating values. An string can not be included in any math operation. On your piece of code you must change som things: [CODE]Imports System.Data.OleDb Public Class Form6 Dim conn As OleDbConnection Dim cmd As OleDbCommand Dim strSQL As String Dim dr As OleDbDataReader Private Sub Form6_Load(ByVal …

You can enable the groupbox and disable all their controls but the one to be enabled. Hope this help

GDI+ is used to draw. If you need some special paintings for the 'image' to show in your control that is good. If you need to create some controls with 'unusual' forms, maybe you need to go for WPF. To know better about GDI+ start reading: [url]http://www.codeproject.com/KB/GDI-plus/GDI_.aspx[/url] (info about the …

Two possible issues. 1) When installing/configuring the server you allowed to access to all system, instead of only to the desired foldeer 2) The sshuser has permission (direct or indirect) to the root of C: drive. In example, all 'Authenticated users' have permissions to create folders below C:\ and all …

In order to debug where the problem is, I will suggest: 1) Just before the ExecuteNonQuery take the Command string content and paste it into a new View (using SQL) in the Access DB and try it. If there is any syntax error ACCESS will help you do find where. …

This should work OK. Can you put the entire piece of code and signal what and where you are testing to obtain the wrong result? Thanks in advance

This may happen because the INSERT sentence in the procedure fails for any reason and you do not trap the error at store procedure level, raising an error if the insert fails. Can you also put the table definition, indexes, triggers, defaults, permissions, etc and also the values passed to …

Be carefull when comparing. In your code, if TextBox1.Text contains "10" and Form4.balance.Text contains "2", the sentence [CODE]If TextBox1.Text > Form4.balance.Text Then [/CODE]will return false. Try to change the If or ElseIf using the Val function like you use in the UPDATE statement. Also use the Val function to do …

On your TSDA data adapter you have only defined the SELECT command. You need to define also the commands for INSERT, UPDATE and DELETE before calling TSDA.Update Hope this helps

There is no easy way. Mostly just a few very small applications can be directly converted. As an starting point you can read [URL="http://dotnet.sys-con.com/node/46335"]this[/URL] even is written on 2005 Hope this helps

After [CODE] AddHandler _client.DownloadStringCompleted, AddressOf DownloadStringCompleted [/CODE] you should 'wait while is busy' [CODE]Do While _client.IsBusy System.Windows.Forms.Application.Doevents() Loop ' ' And wait for the event to be fired ' System.Windows.Forms.Application.Doevents() [/CODE] Hope this helps

Did you declared the child form as MDI child and set the MDI parent to the MDI one? Do you open the child with show() or with ShowDialog()? Thanks

You have the .SelectedRows collection thar returns each selected DataGridiewRow This has the index property that shows the current row number in the DatagridView starting from 0. Hope this helps

Can you put you current code here?

Can you try to use the resulting Dataview instead of the table, because the table is never sorted while the view is:[CODE]Dim Dv as Data.DataView Dv = SortData(dtDTBM) If resultCheckEndOfYear = True Then BalanceEndOfYear(Dv) Else Call BalanceData(Dv) End If[/CODE] And change the Sort function as[CODE]Private Function SortData(ByVal dtDTBM As DataTable) …

At module level define: [CODE]Public EnterKeyPressed as Boolead = False[/CODE] Then on the frmPasscode_KeyPress sub, after [CODE]ElseIf e.KeyChar = Chr(13) Then[/CODE] add [CODE]If Not EnterKeyPressed Then picYes_MouseUp(Nothing, Nothing) EnterKeyPressed = True End If[/CODE] Hope this helps

I think you miss to store the scores. To do that, you can use a Specialized Collection of OrderedDictionary strings. The collection's method add permits you to store the scores in the collection. The collection's method clear permits you to clear all the contents of the collection. The help on …

Please, can you be so kind to clarify: 1) Where do you define LineText as String() 2) The contents of UIText(10) you use to split 3) Why to you compare 3000 times if the UIText(10) has the ValueToGet Thanks in advance

First question: Try means exactly that. Try the code following the Try sentence. If any error occurs then skip the conde until the catch sentence and execute this code. You may find also a Finally clause that is always executed. The End Try sentence closes all the try execution block. …

The best way is to create user contros that ineherits from the control base. On the user controls you can add as many properties, functions and methods you need. In this example you should create two user controls: one for text base and the other for the panel. When defining …