abu taher 34 Practically a Posting Shark

if this solve your problem then please mark it as solved.

abu taher 34 Practically a Posting Shark

I give you a very simple way. at 1st click on project menu_Add Data Environment. Double click on Data Environment1. click right mouse on connection1 & then click properties. In Provider tab click on Microsoft Jet 4.0 OLE DB Provider. Click next. select the database. you can test connection in below. click ok.
click right mouse on connection1 & click add command. again click right mouse on command1. go properties. in database object_select table. In object name_ select table name. click ok.
2. click on project menu_Add Data Report. select the data report. go properties. In Data source select Data Environment1. In Data member select Command1.
3. put a text box (Rpt textbox, in Data report) in detail (Section1) in data report. select the text box. go properties. in data member select command1. in data field_select any.
4. in form1 put a command button and then write

Private Sub Command1_Click()
DataReport1.Show
End Sub

you can get many sample in search engine. try ...

abu taher 34 Practically a Posting Shark

need more information. so please share it.

abu taher 34 Practically a Posting Shark

I didn't see your code. see the attach file. I think it will help you.

abu taher 34 Practically a Posting Shark

I think not like that. your description is not clear to me. when the problem occur? after enter os or before enter the os?

abu taher 34 Practically a Posting Shark

search engine can help you. you get lot of answer of your question.

abu taher 34 Practically a Posting Shark

check this it can help you.

abu taher 34 Practically a Posting Shark

1st you start. you can take help from search engine. download code and try it.

abu taher 34 Practically a Posting Shark

if you mean: to show the current time of computer then please try this

text1.text = now ' show time & date
Text1.Text = Format(date, "dd/mm/yyyy") ' show date
abu taher 34 Practically a Posting Shark

where A is the tax code e.g 16%

this line is not clear to me. so need more information. did you declare any variable for A? or do you want to calculate 16%?

abu taher 34 Practically a Posting Shark

You can use different texbox to do this.

abu taher 34 Practically a Posting Shark

i have tried it in another computer and the hard disk is not being detected.

if its happened normally you can say the harddisk dead. so 1st you need to confirm it.

abu taher 34 Practically a Posting Shark

An invalid variable is being referenced. To create an object variable, declare the object variable and then assign a valid reference to the object variable using the Set statement. Similarly, a With...End With block must be initialized by executing the With statement entry point.


1.Make sure the object variable references a valid object, and specify or respecify a reference for the object.
2.Make sure you did not use an object variable set to Nothing.
3.Make sure the object library in which the object has been described has been selected in the Add References dialog box.
4.Make sure your With block is initialized by executing the With statement entry point.

abu taher 34 Practically a Posting Shark

check this. it can help you more.

abu taher 34 Practically a Posting Shark

So, you may write to me to my email address> mansoor_aslam@hotmail.it <

don't use private email. its not fair. by the way, when enter data by code and you write code for enter its automatically update data. like:
With rs
.CursorLocation = adUseClient
.Open "SELECT * FROM table1", cn, adOpenStatic, adLockOptimistic ' cn is connection

.AddNew

!name = text1.Text
.Update ' update data
End With

so try it with your code what you use.

abu taher 34 Practically a Posting Shark

printer.print text1.text

use it. or more then ask

abu taher 34 Practically a Posting Shark

1st download & unzip it. and then open it.

abu taher 34 Practically a Posting Shark

its not clear to me.

abu taher 34 Practically a Posting Shark

nice example. I have nothing to say after it.

abu taher 34 Practically a Posting Shark

#
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open sql, conn, adOpenStatic, adCmdText '<<<error here'

can you tell me where is sql? and what will rs open?

abu taher 34 Practically a Posting Shark

then marked it solved.

abu taher 34 Practically a Posting Shark

try this. i think it can help you

abu taher 34 Practically a Posting Shark

when I exit the program the list box still the same .

is it possible?

abu taher 34 Practically a Posting Shark

what about wintoflash?

abu taher 34 Practically a Posting Shark

Window may not have it. But I have use Linux to install Linux OS boot on a pen drive. But I have not try on Windows.

it work also in win xp.

abu taher 34 Practically a Posting Shark

Actually I have nothing to say. its depend on your choose. or customer demand.

abu taher 34 Practically a Posting Shark

find it search engine like google, yahoo, bing...........
many free software you will get to make bootable pendrive. and get tips how to make it.

abu taher 34 Practically a Posting Shark

if you run it again did it shutdown again?

abu taher 34 Practically a Posting Shark

try this

Private Sub Timer1_Timer()
      Text1.Text = Time
End Sub

set the interval = 1000

abu taher 34 Practically a Posting Shark

This behavior occurs if a program's DisplayName or uninstall key name is longer than 63 characters.
Important This section, method, or task contains steps that tell you how to modify the registry. However, serious problems might occur if you modify the registry incorrectly. Therefore, make sure that you follow these steps carefully. For added protection, back up the registry before you modify it. Then, you can restore the registry.
To resolve this issue:

1. Click Start, click Run, type regedit, and then click OK.
2. Locate the following registry key:
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall
3. Click the folder of the program that has more than 63 characters in the title, right-click DisplayName, and then click Modify.
4. In the Value data box, type a name with less than 63 characters, and then click OK.
5. If the program's uninstall key name is longer than 63 characters, shorten it also. For example, the following key name is too long:
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\
1234567890123456789012345678901234567890123456789012345678901234
6. Quit Registry Editor.