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.

abu taher 34 Practically a Posting Shark

Method 1: you didn't tell what operationg system you use. ok Move the "Temporary Internet Files" folder back to its original location
To complete Method 1 on a Windows Vista-based computer, follow these steps:

1. Click Start type Internet Options in the Start Search box, and then click Internet Options in the Programs list.
2. On the General tab, click Settings in the Browsing History area.
3. Click Move Folder.
4. In the Please select a folder to which you can add items navigation pane, locate the following folder:
C:\Users\User_Account_Name\AppData\Local\Microsoft\Windows
5. Click OK two times.
6. When you are receive the following message, click Yes:
Windows will now log you off to finish moving Temporary Internet Files. Do you want to continue?
7. Log on to Windows Vista again.

To complete Method 1 on a Windows XP-based computer or on a Windows Server 2003-based computer, follow these steps:

1. Click Start, click Run, type inetcpl.cpl, and then click OK.
2. On the General tab, click Settings in the Browsing History area.
3. Click Move Folder.
4. In the Please select a folder to which you can add items navigation pane, locate the following folder:
C:\Documents and Settings\username\Local Settings
5. Click OK, click Apply, and then click OK.


Method 2: Grant permissions to the "Temporary Internet Files" folder
To complete Method 2 on a Windows Vista-based computer, follow these steps:

…
abu taher 34 Practically a Posting Shark

for default back color (in properties) you can select button face (system tab).

abu taher 34 Practically a Posting Shark

after do this, what problem occurred if you separate the exe?

abu taher 34 Practically a Posting Shark

try this. I think it can help you.

abu taher 34 Practically a Posting Shark

how you connect it? it easy to solve, if you connect it by ODBC.

abu taher 34 Practically a Posting Shark

pls can someone tell me how make a picture move across the screen in visual basic 6.0, i have no idea.....

Please give more information.

abu taher 34 Practically a Posting Shark

this file should reside in \windows\system32 (be sure to enable viewing system files).

If it not there copy it from the XP installation disk (expand ntprint.dl_).

If it is there what is the date stamp on the file and file size

jewelcool commented: Thanks +0
abu taher 34 Practically a Posting Shark

but without database how you do it? cause the project can't find the database then how it will run?

abu taher 34 Practically a Posting Shark

check the attach file.

abu taher 34 Practically a Posting Shark

it can not find the database file. so properly locate the database file.

abu taher 34 Practically a Posting Shark

hello can you help me how to secure database password..hoping for your positive responds...thank you in advance...

did you mean to set password in ms access ?

abu taher 34 Practically a Posting Shark

hello can you help me, i make exe file on my project but the problem is that when i separate the exe file in my folder where my project is stored. it will not run..but i want only my exe file and put it to my flashdrive without the folder of my project..can you help me with this..thank you in advance hoping for your positive responds.

is this a database project and confirm the database file with it in the same folder. what kind of problem you face? if you not use pdw then some .dll file or some .ocx file what u use in your project are need with exe.

abu taher 34 Practically a Posting Shark

this is a shape control. in properties tab select shape = 4 - rounded rectangle.

abu taher 34 Practically a Posting Shark

this is enough what vb5prgrmr said.

abu taher 34 Practically a Posting Shark

massage box has some default icon. you can use it. like:

Msgbox "This is an Information box", vbinformation, "Information

when you write this code then you will see all type of msg. like: vbcritical, vbquestion, vbexclamation, vbinformation

abu taher 34 Practically a Posting Shark

in ms word the save button is a toolbar. if you want to do like it then you need to use toolbar.
if don't want to use toolbar then you can do it many ways. like: image or picture box. or like debasis.

abu taher 34 Practically a Posting Shark

I am not clear. inserting picture in a button..........again you said "i want to put beauty on my form i want my button to change to picture just like saving a document"
what you want. I think you want to change your background picture of form.

abu taher 34 Practically a Posting Shark

properly change the textbox and button name as I said. look clearly. button name commandbutton1 and textbox name textbox1 and textbox2.

abu taher 34 Practically a Posting Shark

You can try this. in your code you use huge code.

abu taher 34 Practically a Posting Shark

you didn't say what your problem. try this to check whether given number is a Prime Number

Option Explicit
 
Public Function IsPrime(ByVal n As Long) As Boolean
    Dim I As Long
    IsPrime = False
    If n <> 2 And (n And 1) = 0 Then Exit Function 'test if div 2
    If n <> 3 And n Mod 3 = 0 Then Exit Function 'test if div 3
    For I = 6 To Sqr(n) Step 6
        If n Mod (I - 1) = 0 Then Exit Function
        If n Mod (I + 1) = 0 Then Exit Function
    Next I
    IsPrime = True
End Function