if this solve your problem then please mark it as solved.
jewelcool commented: Thanks +0
if this solve your problem then please mark it as solved.
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 ...
need more information. so please share it.
I didn't see your code. see the attach file. I think it will help you.
I think not like that. your description is not clear to me. when the problem occur? after enter os or before enter the os?
search engine can help you. you get lot of answer of your question.
check this it can help you.
1st you start. you can take help from search engine. download code and try it.
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
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%?
You can use different texbox to do this.
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.
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.
check this. it can help you more.
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.
printer.print text1.text
use it. or more then ask
1st download & unzip it. and then open it.
its not clear to me.
nice example. I have nothing to say after it.
#
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?
then marked it solved.
try this. i think it can help you
when I exit the program the list box still the same .
is it possible?
what about wintoflash?
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.
Actually I have nothing to say. its depend on your choose. or customer demand.
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.
if you run it again did it shutdown again?
try this
Private Sub Timer1_Timer()
Text1.Text = Time
End Sub
set the interval = 1000
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.
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:
for default back color (in properties) you can select button face (system tab).
after do this, what problem occurred if you separate the exe?
try this. I think it can help you.
how you connect it? it easy to solve, if you connect it by ODBC.
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.
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
but without database how you do it? cause the project can't find the database then how it will run?
check the attach file.
it can not find the database file. so properly locate the database file.
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 ?
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.
this is a shape control. in properties tab select shape = 4 - rounded rectangle.
this is enough what vb5prgrmr said.
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
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.
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.
properly change the textbox and button name as I said. look clearly. button name commandbutton1 and textbox name textbox1 and textbox2.
You can try this. in your code you use huge code.
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