Search results

Db passwords = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\SomeDB.mdb;Persist Security Info=False;Jet OLEDB:Database Password=TheDatabasePassword" Will post the username and password code if you need it. note the :D is ment to be : D without the space

Exactly what are your trying to say, what are you trying to do. ps. It would help if you write using readable gammer and punctuation!

what type of password is it, 1) DB password 2) username / Password the string is different for both

No probs m8 :cool:ShadeZ:cool:

just an idea but you could try using rst.Fields("[Field]").value instead of rst![Field] or it could be rst.Fields("Field").value not cirtain if you need the [] or not. Another idea if you want to remove "/"'s from your field names use sql like this sql = "Select [C/F] as CF, EELoan...

Hmmmmmmmmmm, I have just done a few experiments on this, and it looks like you cant use clone. you will have to work with the forms recordset directly. ie Private Sub Command62_Click() Dim lp As Integer Dim Cal1 As Double Dim Cal2 As Double Dim Cal3 As Double Dim Cal4 As Double with...

lol, i think you need a few lessons on how to debug. There is no RecordsetClone property with ado. you need to use Set RS = Me.Recordset.Clone this should solve the problem

You must be using access 97 Try adding, from the vb code editor add a refernce to "Microsoft data access components " version 2.5 or higher, if you dont have it download it from microsoft.

I think i just spotted your problem. the recordset your referencing is a ADO recordset not a DAO recordset. try Private Sub Command62_Click() Dim lp As Integer Dim RS As adodb.Recordset Dim Cal1 As Double Dim Cal2 As Double Dim Cal3 As Double Dim Cal4 As Double Set RS =...

The method you have quoted should work but you could try setting the control scorce of the text box to =[first field for 120] & "/" & [secone field for 80] this should work as well

Hmm Thats a little more tricky but possible. strCoy = "(Company Like " & Chr(34) & " " & Forms![ReportPage]!CompanyCbx & "*" & Chr(34) & " or company Like " & chr(34) & Forms![ReportPage]!CompanyCbx & "* " & chr(34) & ")" Or mayby this might be better strCoy = "(Company Like " & Chr(34)...

Hmm best i can think of is to use the LostFocus event of the postcode textbox. eg Private Sub Postcode_LostFocus() Select Case postcode Case 1 to 1000 Postgroup = 100 Case 1001 to 2000 Postgroup = 200 Case...

I do belive there are builtin functions (ie in the combo box) that provides exactly what you are looking for?

You can process the file manualy, ie open the file then use sql to add the records to you DB. I can point you in the right direction. Look at the vba functions OPEN [filename] For [method] as #[filenumber] and line input #[filenumber],[Outstring] note [Something] is a variable...

Im assuming you only want to look at the first few letters of the string. so strCoy = "Company Like " & Chr(34) & Forms![ReportPage]!CompanyCbx & "*" & Chr(34) will check for the string at the beginning only ShadeZ

Ok, i think i see where you are going wrong and its a simple mistake to make. your line reads:- Company like "*A * " so your looking for something that has an "A" at the end of a word and the sentence must end in a space. The code below( Note i removed the extra spaces around the second *.)...

1)My code wont work without the required "EmailPlus.DLL". As far as im aware you dont have this, it was to big to attach to the post. 2)You attach files via code, IE buildemail.addattachment "C:\somefile.xls" 3)You can type a message just not in outlook "EMAIL PLUS DOESENT USE OUTLOOK"...

You could try something along the lines of dim chkChr as integer chkChr = asc(ucase(left(YourTestField,1))) if chkchr >=65 and chkchr <=72 then 'first character is between A and H end if Hope this helps ShadeZ

Here you go, its a simple email sending dll, designed to allow you to set the subject, text, add atachments, send to, CC and BCC Here is an example of its use Private Sub Command1_Click() Dim aEmail As New BuildEmail aEmail.SetSubject "Hello!" aEmail.AddBCC "rudi@taical.co.uk"...

lynsey2 Are you still having trouble?? I have a solution which doesnt use docmd.sendobject Let me know if you want it? ShadeZ