How To Search An Ms Access 2000 Database

MS Access 2000: Database Won't Update Or Search
Hello everybody, haven't posted here in probably a year or 2. I have a problem with some code I have been writing today. It lacks comments and it isn't very neat because I tried to get it done in a hurry. If possible I would like to figure out how to display the results from my query in a list box on the search thing instead of having that data field. I probably can figure that out myself after I get my first 2 problems figured out.

I have all the code done (I think) but I cannot add any information to my database or search for data. I manually inputted Data into the database to try to search and it failed. Thanks for your help.

---

Using A Combo Box To Search For A Specific Records In An MS Access 2000 Database Table.
Please, kindly help me.

Instead of using an input box to find a specific record in an Access 2000 Database Table, I want to use a Combo box. When the user clicks on any names stored in the Combo box, the appropriate records should be displayed in the relevant fields.

I have connected all the fields on the Form to the Database Table through ADO.

---

SQL Search In Access 2000?
Hey all, I know in SQL you can use contains or Like, or In to find things, but is there anything like it in Access?

I'm pulling information from a database, the field contains directoryfilename.ext, I need to see if one of the fields only contains a filename that match a filename that I'm giving it.

I can't find anything in Access that does this, does that mean that I'm going to have to do a loop in my code checking eachone use the InStr function instead of being able to have my sql string handle it for me?

THanks in advance for the help.

---

Search Query In Access 2000
How would I setup a simple search through a query? What would I put in the "CRITERIA" box under a particular field in order for a user to be promted to enter search criteria? Please help me. I am working in Access 2000.

---

Search Buttons In Access 2000
I am building an access image database. I did so by using links to point to the images
with the help of vbcity and it's working fine.
Now i need to create a search button that will earch the links in the form.
I know how to create the button in access. Which code will be more approprite to use.
I tried using the built-in search function in access but it provided the user the abilty to replace the name of the link
but i do not want the user do modify anything. how do i do this.
help help!!!
Thanks
kobespice

---

Access 2000 DB Query Search Textbox
I havnt programmed much in access itself but I have created a query in access and also have created a form. On the form I setup a text box with a command button. I want the command button to run my query searching the date that is put into the textbox. Any little bit of sample code for this would help.

Thanks

---

Displaying Search Results In Access 2000
Hey yall. I have created a search form with another form to display the results. Long story short, I'm having problems with my code. So far, I have it working except that if there are more than one record, it only displays the last record found. What I did was on my search results form, I have added a combo box for the "Vendor's" Id. So when there are more than one record it will list the Id's in this box and I will be able to choose which one I want and have it display that information from that particular vendor. I'm thinking I am missing a list syntax somewhere to list the other records, however I'm not sure. Does anybody have any suggestions on why it would list the last record only, instead of all records found?

Thanks in advanced.

---

Listbox - Search & Select (access 2000)
Hi All
I have a list box whose rowsource is a select query.

The user can select numerous rows & then click a cmd button to copy these selected rows to another table. The identifiers for each row are collected in a string & passed in a query parameter to append to this other table.

However the identifier is not unique so its copying other records over aswell.
Is there a way of remembering the selected row number in the listbox. If i can edit one fiels in it i.e. set up a selected field = true & set if selected this would be appropriate.

Or is the best way adding a unique reference & then using this as the ID - i wanted to avoid this as these tables are appended & deleted frequently on a daily basis & they contain large numbers of records.

The code to buld the id string is:

Code:
For i = 0 To lstUnMatched.ListCount - 1
        If lstUnMatched.Selected(i) Then
            If lstUnMatched.Column(0, i) = "All" Then
                flgSelectAll = True
            End If
            r = r + 1
            strIN = strIN & "'" & lstUnMatched.Column(0, i) & "',"
        End If
Next i


Your help is much appreciated!!
M

---

Search Function In VB6 Form For An Access 2000 Dbase
hello all,

I am still in the process of learning VB6, but I made a little app allready. I have a access database with one table and quite a lot of records. Now i created a form in VB that shows all related fields in the database. i can scroll through, add delete etc. now i want to be able to search for data in the dbase. i created a cmd button that opens a search window...much like the one in IE for example. So i have a text box and a find button. from this form i want to search through the dbase and if a match is found goto to that specific record. closing the search form and all that is no problem, but i can't seem to find the appropriate commands to make this search happen.

any info is highly appreciated.

Regards

---

Duplicating Access 2000 Combo Box Record Search Capabilities
Hi:

Is any way to create a combo box control on a visual basic 6 form that has the same record search capabilities as a MS Access combo box.  So far, I have only been able to link to an ADO record source using an MSRDC control in visual basic, but it dosen't provide any way to search for specific records by selecting items from a drop-down box.  

---

How Do I Make A Field In Access 2000 Auto Search A Web Page After I Put Text In?
I have a db that i enter my clients accounts in, i have information in it like their customers last known address and phone numbers and so on. i would like to know a way to have the fields automatically search a predetermined website for correct info based off what i had in the field, or even after i put the information in the field then hit push button.

for my phone numbers, i use the web site:

http://primeris.com/fonefind/

then there are two boxes i use on that site,

"area code" 602 "exchange" 214

then it comes back with the correct info i need, i copy it to my notes....

i would like a way that will auto go to the website and place the contents of the fields in the right places on the website and search it.

---

Shared Access To An Access 2000 Database In A Network Directory
Hi!

My application (a VB executable) uses a Microsoft Access database to store various information entered by the user. The application and the database are located on the network so many users can access it simultaneously. Just recently, I implemented persistent connections so the database connection remains open for the entire life of the application (which speeds things up considerably compared to connecting every time something needs to be done). Since then, only one user seems to be able to connect at any single time. As far as I know, Access allows about 20-30 simultaneous user connections without a problem (and can do much more), so why does it lock the database exclusively? The application is loaded into the memory of every user's computer, so each user should use only their own connection object.

Here's the code I use to connect:

==================

Set m_DbConnection = New ADODB.Connection
With m_DbConnection
sDSN = "Provider=Microsoft.Jet.OLEDB.4.0;"
sDSN = sDSN & "Data Source=" & sDb & ";"
sDSN = sDSN & "Persist Security Info=True"

.ConnectionString = sDSN
.CommandTimeout = 8 'wait 8 secs before exiting commands
.ConnectionTimeout = 15
.CursorLocation = adUseClient
.IsolationLevel = 4096
.Mode = adModeShareDenyNone Or adModeReadWrite
.Open
End With

PROC_Exit:
Exit Function
PROC_Error:
If Err.Number = -2147467259 Then 'Cannot open database (either doesn't exist or locked)
Dim vErr As ADODB.Error
If Not (m_DbConnection Is Nothing) Then
If m_DbConnection.Errors.Count > 0 Then
For Each vErr In m_DbConnection.Errors
HandleError ERR_LOG_DETAIL_LONG Or ERR_TARGET_LOG, vErr.Number, vErr.Description & " (native error: " & vErr.NativeError & ")", vErr.Source, "basDb::PrepareConnection"
Next vErr
Else
HandleError ERR_LOG_DETAIL_LONG Or ERR_TARGET_LOG, Err.Number, Err.Description, Err.Source, "basDb::PrepareConnection"
End If
Else
HandleError ERR_LOG_DETAIL_LONG Or ERR_TARGET_LOG, Err.Number, Err.Description, Err.Source, "basDb::PrepareConnection"
End If
Else
DisplayDetailedError Err.Number, Err.Description, Err.Source, "basDb::PrepareConnection"
End If
Resume PROC_Exit

==============

If another user already connected to the db, I get this error:

Error #-2147467259: Unable to use ''; file is already in use. (native error: -67044352, minor error code: -1024, major error code: -1024, Jet IDA Number (DAO Error): 3045) [source Microsoft JET Database Engine, procedure basDb::PrepareConnection]

(the first error is an ADO error, the native error is what the data provider returns, and other things are just what I got after doing a few searches on MSDN).

I first thought that the problem is about the Mode property setting of the connection object, but MSDN describes adModeShareDenyNone constant as the less restrictive, full database sharing mode, and combining it with adModeReadWrite seems the most logical solution to allow others to read/write data. I even tried to remove it (leaving only adModeReadWrite), but the same thing took place.

I tried to change the CursorLocation property to adUseServer, but it had no effect.

I tried updating the version of MDAC to 2.6, but to no avail.

Have any of you had the same problem or knows the solution? I will appreciate any help I can get!

Thanks a lot in advance!

Stanislav

---

Database Access Problem From Ms-access 2000 To 97
I have developed software, front end is visual basic 6.0, ADO and backend is msaccess 2000. I created setup and installed in someother PC, which is having Msaccess 97, as soon as i opened the application, it gives the error "Provider not supported " and "unrecognised database format". I rectified the problem by installing msoffice 2000 software. I don't want to solve the problem by installing msoffice 2000. So kindly give me the sugestion. I waiting your reply.

   
I USED PACKAGE & DEPLOYMENT AND INSTALLED IT TO ANOTHER PC, WHICH IS NOT HAVING VB SOFTWARE BUT IT HAS MSACCESS 97, WE DEVELOPED THE SOFTWARE BACKEND AS MSACCESS 2000. WE ARE FACING PROBLEM WHILE USING THE SOFTWARE "UNRECOGNISED DATABASE FORMAT". FOR EXAMPLE "ADDING NEW ENTRIES."
Thanks for ur response.

I am waiting for ur reply.

Thanks

R.Sundar

rsundarpad@yahoo.com

 

Edited by - sundarvbcity on 9/16/2003 4:33:28 AM

---

Access 2000 Database
I am writing an application that uses an Access 2000 database ... it is working great. I access the database using a connection string when the form is loaded. My question is about closing the connection ... is it necessary or does the OS clean up the connections when the application stops. Any ideas or suggestions would be greatly appreciated.

Thanks in advance.

---

Access Database 2000/97
Does anyone know how to retrieve attachments from Microsoft Outlook from an Access Database??

We have written a program to process data from attachments that are sent via email, the program works fine at the moment but it's a hassle opening outlook and copying the attachments to the local machine, i really need to have the access database connect to Miscrosoft outlook or outlook express and automatically retrieve the attached files and save them to an appropriate location.

cheers Gary

---

DAO And Access 2000 Database
I'm trying to use a DAO Data Control to retrieve records from an Access 2000 database. Which is the value I have to set in the Connect property? If I use "Access" I get an error stating that the format of the database is unrecognized.

Any help will be great!
Thanks in advance

---

Using Access 2000 Database With VB6
I am a newbie here and would appreciate help with a problem.

I am developing an application in VB6 that must use a database created using
Access 2000
when I try to bind the table in the datasource property I get a message that
it is an
Unrecognized database format.

I assume I need some update to VB6 in order to use an Access 2000 database.
If that is true can anyone tell me where it is found or do I need to change
some settings?

---

Access 2000 Database In VB6
HI,
How do I open database of Access 2000 in VB6.
I tried but it doesn't accepts database of Access 2000.
Want to use Access 2000 database unable to use it.

Please help

---

VB6 And Access 2000 Database
A co-worker of mine is working on a project to convert all of our Access 97 databases to Access 2000 and is encountering a run-time 13 'Type mismatch' error.

He first converted the Access 97 database to Access 2000 and then changed his VB project's references to reflect 'Microsoft DAO 3.6 Object Library'. The run-time error 13 is thrown on the .OpenRecordset execution.
Here's his code:

Code:'* Create jet workspace object

Set wrkSession = CreateWorkspace("", "admin", "", dbUseJet)

'* Open database objects from jet database for shared use

Set dbChangeControl = _
  wrkSession.OpenDatabase("C:ChangeControl.mdb", False)
qryApplicationInfo = _
  "SELECT * FROM ApplicationInfo " & _
  "WHERE (ApplicationName = '" & App.EXEName & "');"
Set rstApplicationInfo = _
  dbChangeControl.OpenRecordset(qryApplicationInfo, dbOpenForwardOnly)

My co-worker would appreciate any help. Thanks.



Edited by - klink on 4/18/2005 11:54:15 AM

---

Using LIKE With An Access 2000 Database
I am attempting to use the SQL "LIKE" operator in a select statement using an Access 2000 database and it doesn't appear to be working properly.

I use a statment:


Code:
SELECT * FROM Table1 WHERE field1 LIKE "zeb%"


where there is a record that matches the zeb pattern (say "zeb123") in the table and it doesn't find it. If I change it to be 'LIKE "zeb123"' then it finds the match, but if LIKE isn't working with wildcards, whats the point!?

So I checked the access help, and tried the query wizard, and I can't find any mention of LIKE anywhere in Access, so I am worried it doesn't support it.

Anyone have any ideas on this one? I also tried using an "*" as the wildcard, even though my SQL doco says "%" is the correct wildcard character.

Thanks for any help ppl

---

Sample Access 2000 Database
is there a sample access 2000 database available? something that displays all the features of access, i.e. tables, queries, forms, reports, VBA macros etc. I've searched the web and can't find a thing. I think there's a sample northwind database from microsoft that came with the applciation, but it wasn't installed on my PC, and I don't have access to the installation disks.

---

Conecting To A Access 2000 Database
Can anyone tell me how can I connect my database from Access 2000 to my VB application??

An example will be very helpful


Thanks in advance,


Omar

---

Compacting An MS Access 2000 Database
Does an anyone know how to compact an MS Access 2000 database on the fly.

What I mean is this, I'm accessing my database through VB6 with a DataGrid. I've created a button to add a new record & another to cancel the new entry if the need arises. If I decide to cancel the new record the database remains the same with nothing added. So far so good. The problem is here, the next record I enter & save to the database its Autonumber is no longer in sequence with the previous record, e.g. previous record's Autonumber is 15 & the new record's Autonumber is 17 (16 is missing).

Can anyone please tell me if it's possible to add some coding to the Cancel action to Compact the database.

I thank you all for any help offered.

---

Access 2000 Database Problem
I was using Access 97 for my project in VB, and the application was running fine now i have updated access 97 to access 2000, and converted tha database also to 2000 with convert database utility in access 2000, now the problem is that, when i run my application, it shows the following error,

' C:windowsdesktopliblib.mdb' is not a valid path. make sure that the path name is spelled correctly and that you are connedted to the server on which the file resides.

how ever i am running the application on a standalone machine, and the path name is correct, b'coz the application is on my desktop only.

could some one help......plz......

---

How Can I See The Paswords In Access 2000 Database?
I'm using access 2000 database and in the passwords field is is some kind of code (it look like this : 57ec9d6f8c7b452f38a48bb8eb92d51f10ed9a7fbf85841e76703a8)

What can I do to se the passwords in that field?

---

VB6 Front End With Access 2000 Database
Help!!!


Can Someone please suggest to me why I keep getting run-time error 3426. I have researched it and tried every suggestion I have found!!!! Help!! The answer is probably right in front of me and but I am suffering from "VB hypnosis." Any suggestions are appreciated!!!

Here is my code: I have highlighted the lines that are causing my error!


Code:
Dim intUserResponse As Integer
Dim SearchStr1 As String

Private Sub cmbAccessFee_KeyPress(KeyAscii As Integer)
KeyAscii = 0
End Sub


Private Sub cmbEmployeeID_KeyPress(KeyAscii As Integer)
KeyAscii = 0
End Sub

Private Sub cmdAdd_Click()

cmbEmployeeID.Enabled = True
cmbDealerCode.Enabled = True
cmbPeriod.Enabled = True
cmbYear.Enabled = True
cmbTerms.Enabled = True
txtDate.Enabled = True
txtCustomerFirstName.Enabled = True
txtLastName.Enabled = True
txtWirelessNumber.Enabled = True
txtEsn.Enabled = True
chkUpgrade.Enabled = True
txtRateCode.Enabled = True
cmbAccessFee.Enabled = True
cmbLocation.Enabled = True
cmdEdit.Enabled = False
cmdFind.Enabled = False
cmdUpdate.Enabled = False
cmdSave.Enabled = True
cmbEmployeeID.SetFocus
[color=crimson]frmMain.DatCommission.Recordset.AddNew[/color]



End Sub

Private Sub cmdEdit_Click()

cmbEmployeeID.Enabled = True
cmbDealerCode.Enabled = True
cmbPeriod.Enabled = True
cmbYear.Enabled = True
cmbTerms.Enabled = True
txtDate.Enabled = True
txtCustomerFirstName.Enabled = True
txtLastName.Enabled = True
txtWirelessNumber.Enabled = True
chkUpgrade.Enabled = True
chkCancellation.Enabled = True
txtCancellationDate.Enabled = True
txtNotes.Enabled = True
txtRateCode.Enabled = True
txtEsn.Enabled = True
cmbAccessFee.Enabled = True
cmbLocation.Enabled = True
cmdEdit.Enabled = False
cmdSave.Enabled = False
cmdUpdate.Enabled = True
cmdFind.Enabled = False
[color=crimson]frmMain.DatCommission.Recordset.Edit[/color]
[color=crimson]frmMain.DatCommission.Recordset.Update[/color]


End Sub

Private Sub cmdEnd_Click()

frmMain.Hide
frmSignin.Show
cmbEmployeeID.Enabled = False
cmbDealerCode.Enabled = False
cmbPeriod.Enabled = False
cmbYear.Enabled = False
cmbTerms.Enabled = False
txtDate.Enabled = False
txtCustomerFirstName.Enabled = False
txtLastName.Enabled = False
txtWirelessNumber.Enabled = False
txtEsn.Enabled = False
chkUpgrade.Enabled = False
chkCancellation.Enabled = False
txtCancellationDate.Enabled = False
txtNotes.Enabled = False
txtRateCode.Enabled = False
cmbAccessFee.Enabled = False
cmbLocation.Enabled = False



End Sub

Private Sub cmdFind_Click()
frmMain.Show
frmSignin.Hide
SearchStr1 = InputBox("Please Enter Customer Wireless Number", "Customer Wireless Number")
frmMain.DatCommission.Recordset.Index = "Customer_Cell_Number"
frmMain.DatCommission.Recordset.Seek "=", SearchStr1
If frmMain.DatCommission.Recordset.NoMatch Then
frmMain.DatCommission.Recordset.MoveFirst
cmdEdit.Enabled = False
Else
cmdEdit.Enabled = True
End If

[color=crimson]frmMain.DatCommission.Recordset.Edit[/color]

End Sub

Private Sub cmdSave_Click()


If cmbAccessFee.Text = "" Then

intUserResponse = MsgBox("You Must Fill In All Fields!", [vbOKOnly], "Information Required")
cmbAccessFee.SetFocus
Else
[color=crimson]frmMain.DatCommission.Recordset.Update[/color]
cmbEmployeeID.Enabled = False
cmbDealerCode.Enabled = False
cmbPeriod.Enabled = False
cmbYear.Enabled = False
cmbTerms.Enabled = False
txtDate.Enabled = False
txtCustomerFirstName.Enabled = False
txtLastName.Enabled = False
txtWirelessNumber.Enabled = False
txtEsn.Enabled = False
chkUpgrade.Enabled = False
chkCancellation.Enabled = False
txtCancellationDate.Enabled = False
txtNotes.Enabled = False
txtRateCode.Enabled = False
cmbAccessFee.Enabled = False
cmbLocation.Enabled = False
cmdEdit.Enabled = True
cmdFind.Enabled = True
cmdUpdate.Enabled = False
End If

End Sub


Private Sub cmdUpdate_Click()
[color=crimson]frmMain.DatCommission.Recordset.Edit[/color]
[color=crimson]frmMain.DatCommission.Recordset.Update[/color]
cmbEmployeeID.Enabled = False
cmbDealerCode.Enabled = False
cmbPeriod.Enabled = False
cmbYear.Enabled = False
cmbTerms.Enabled = False
txtDate.Enabled = False
txtCustomerFirstName.Enabled = False
txtLastName.Enabled = False
txtWirelessNumber.Enabled = False
txtEsn.Enabled = False
chkUpgrade.Enabled = False
chkCancellation.Enabled = False
txtCancellationDate.Enabled = False
txtNotes.Enabled = False
txtRateCode.Enabled = False
cmbAccessFee.Enabled = False
cmbLocation.Enabled = False
cmdEdit.Enabled = True
cmdFind.Enabled = True
cmdUpdate.Enabled = False

End Sub

Thanks
Giacomo!!

---

Password On Access 2000 Database
Using an Access 97 database i wrote:

DaoControl.Connect = "Access;PWD=password"

I converted my database into Access 2000.
I thought I should have used the following line:

DaoControl.Connect = "Access 2000;PWD=password"

but it didn't work. What's the new syntax on Dao 3.6 ? Really thanx.

---

Problem Using Access 2000 Database
I recently change my program database to Access 2000 (from Access 97). I’m using dao 3.6 in project. When I use dao.Database and dao.Recordset, there is no problem. But When I put a Microsoft Data Bound Grid (DBGrid) object in a form and try to use it, I faced error at Data1.Refresh line. The error is “Runtime error 3343: Unrecognized database format ‘dbname‘”. And if I use Data1.Connect = "Access 2000;" then I faced "Could not find Installable ISAM" error.


What should I do?

---

Life Of Access 2000 Database
My Access 2000 database increases about 600 records a month which equals around 5MB. So it grows about 5 to 6MB a month.

I wont have alot of concurrent usage on the database and the front end will be a Web Application.

Please advise how long this database will last before I will start having problems with max size and records.

---

Close Access 2000 Database
hello,

on my vb project i use a 2000 access database. when i end the program i make a backup of the database and i try to compact the original database.
i use this code:

Dim JRO As JRO.JetEngine
Set JRO = New JRO.JetEngine
JRO.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & caminho & "databasegespos.mdb", _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & caminho & "databasecopia.mdb;Jet OLEDB:Engine Type=4"

But it always gives an error saying that the database is still open.... and can not continue...
how can i solve this problem ?

---

Managing Access 2000 Database
Hi,
Could anyone tell me how to well manage an access database running on a vb 6.0 application such that after a given number of records a backup is made automatically to the archive and all records in the current table are deleted to give room for quicker data access and retrieval. Mark you it should be such that whenever you want to access records whether they are on the current table or the archive you should just do it normally as if the records are in two different locations. I am using ADO's to connect to the database.

---

VB6 Accessing ACCESS 2000 Database
VB6 Accessing ACCESS 2000 database
I set up a database in ACCESS 2000. Trying to communicate or access information from the database to a program created in Visual Basic 6, I set up a form with a data control. In the DatabaseName property I inserted the folder from the pop-up dialogue box. But when I clicked on the RecordSource property, this message was displayed:
“Unrecognized database format ‘C:VBFilesChinaChina.mdb”. The path is the proper location of the file I am attempting to access. What did I do wrong?

---

Searching An Access 2000 Database
Im making a lunch detention database program for my school and i need to search the database by ID number. I left you a copy of my program so you can fill in the search code.

---

Compact An Access 2000 Database
Hi ppl,

I have a question here about compacting a database. Please refer to the post in the database development forum...Thank you very much

http://forums.vb-world.net/showthrea...threadid=74023

Any help is appreciated. Thanks

---

Saving .bmp To A Access 2000 Database
I need to save a .bmp to a database, All I have is the path + bmp name? is there a way to do this?

---

How To Connect Between Access 2000 Database And VB5 ?
Hi
When I am trying to connect between a database of Access 2000 and VB5, I get the error: "unrecognized access/database format"

What to do?

---

MS Access 2000 Database Properties
When I select File Database Properties and then the Statistics tab the Printed, Last Saved By, Revision Number, and Total Editing Time are blank.  Any ideas why?

---

SQL Database Query (Access 2000)
Hi Peeps,

I have a sales order header table and a sales order details table. I have two ado controls one showing the header information and the other showing the details relating to the header link. In the details ado control is a status field and I want to show all header with details of a specific status.

HEADER        DETAILS        STATUS
1        1        1
        2        1
        3        2
        4        3

The problem I am having is getting to show only one header record. I have used DISTINCT in the SQL but it seems to do it on the STATUS in the details table giving header 1 in this example three times becasue there is three different STATUS values. Here is my true SQL statement:-


SELECT DISTINCT SOHDR.*, SODTL.STATUS FROM SOHDR INNER JOIN SODTL ON SOHDR.REFNO = SODTL.SOHDRREFNO

Can someone please help, I only want to see one instance of the header records.

Cheers very much,

Jiggy!

---

Opening ACCESS 2000 Database
I'm trying to open an ACCESS 2000 with the following code:

Set ws = DBEngine.Workspaces(0)
Set db = ws.OpenDatabase("C:Program FilesMicrosoft Visual StudioVB98AOPT1.MDB", False, False)

upgrading from ACCESS 97 to 2000, Im getting an "unrecognized database format" error message.

What is the correct connection code for ACCESS 2000?

Thanks.

Vic

---

Access 2000 Database Properties
How can you set the Access 2000 Database properties via Visual Basic 6? Example: If you want to set the Default Share Mode to "Shared" how would you do that?

Does anyone have any link that shows some sample of code to set the rest of the settings in Tools, Options?



Edited by - cmc on 5/15/2004 7:16:59 AM

---

Opening A 2000 Access Database Using VB6.0
Hello all,

How do I open a Access 2000 database using VB 6.0? I am used to databases of Access 97, and I am having a hard time connecting to a 2000 database.

I appreciate your help.

Regis

---

Access 2000 Database Locked Up
I know this is an old and common problem for many people. In fact, I have had this problem for a long time but still have not fixed.

My customer was using our VB6 application with Access 2000 database on a standalone industrial machine. This morning she could not start the application and got an error:

3197 The Microsoft Jet database engine stopped the process because you and another user are attempting to change the same data at the same time.

I prompted her to search for any ldb files but she could not find any in the whole hard drive. Then she emailed me the database file.

Of course, I cannot not open it so I cannot do Compact and Repair through Access tool. Then I tried using VB code to repair it but I still got the same error.

Here are my questions:

1. How to fix the database? Any tools or third party software I can use?

2. What caused the crash?

Please help soon. Thanks.

Jeff

---

Access Database And Windows 2000
I am using VB6, DAO 3.6, Jet 4.0, and Access 4.x (Access 2000). Everything works just fine on Windows 9x and Windows NT, but on Windows 2000, if there are multiple users modifying and updating the data at the same time, the data corrupts. Even after it corrupts and one user is getting an unrecognized database format error, the other users can still enter data until they close the program and re-start it. From what I can tell, this seems to be a problem with the way Windows 2000 interfaces with the client side data cursor in Access. I cannot find a fix for this problem. Has anyone else run accross this or do you have any ideas on how to fix it? Thanks.

---

Connecting To Access 2000 Database Using ASP
I'm trying to make an asp page to connect to my password protected database(not by access). I re-used some asp code we used for a project in an access class and got the code to work. The only problem is that I have to keep the db name the same name as the project file name and couldn't change the web-site to a different sever. Obviously since this is for my work this solution won't work, as I need to put the site up on my work server.



Here is the dsn code.


Code:
'' \\\\\\\\\\ CONNECTING TO DATABASE \\\\\\ Dim Myconn,MyRS,MyField,MyRecord,DSNstr,SQLstr
        Set Myconn = server.CreateObject("adodb.connection")
        Set MyRS = server.CreateObject("adodb.recordset")
        Set MyRS2 = server.CreateObject("adodb.recordset")
        DSNstr="DSN=MIS33K-Poynor-Project01;UID=;PWD="

     Myconn.Open DSNstr

and here is some server.mappath code that I would like to use but don't know how to set up at work to have login capabilites.

Code:Dim OBJdbConnection, RsList, strProvider
' Create and open db connection
Set OBJdbConnection = Server.CreateObject("ADODB.Connection")
' strProvider is a string containing the pathname to my database
strProvider = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
           server.mappath("/PTD/db/") & "PTD.mdb;"
' open db connection
OBJdbConnection.Open strProvider

I would prefer to use the server path connection as I can't change the dsn settings myself. How can I get the server.mappath code to work and still have login capablities?

---

Locking An Access 2000 Database
I'm currently working on an Access 2000 dB and want to be able to load it on to a CD to make it portable. I therefore want to prevent the user from entering any more data into the database when it's size reaches 585 MB (to guarentee that it fits on to the CD).

I have been able to determine the file size using the FileLen function and I have managed to set the database attributes to read-only using the SetAttr function.

The problem is that the user can still enter data in the database. The read-only attribute only seems to take effect when the dB is closed down and re-opened again.

Is there any way to lock the database without having to close it down?

Thanks in advance,

Pete.

---

Create Database For Access 2000
I would like to create a database in Access 2000 but when I try to open database in access2000 I need to convert because the version was to old like 97. My data connect = access 2000;

How can I do that ?

Thanks
Sorry for my english

---

How To Search In Access Database ?
Welcome

i want code vb6 to search data access

please help

thanks

---

Search An Access Database From VB
Can anyone help me here?

I have an program that uses access database.I have entered a lot of info into the database.

Now if I want to search for a particular part number (bearing in mind that part number might have several instances) and I need to see them all.

Thanks in advance

---

How Do I Search An Access Database?
Could someone please tell my how i would go about creating a search field for an access database.

I just want it to be a textbox and a comand button. and i want the results to be displayed in a list box?

Is that possible? and if so how!

---