Recent content by xarxas

its working now :) thank

Thank Simon, will try it!

you need to define the SendFax function. copy it somewhere :D Public Function SendFax(ByVal strFaxNumber As String, _ ByVal strReport As String, _ Optional ByVal strName As String, _ Optional ByVal fLocal As Boolean = False, _...

you need "the copy" function there in order to make the backup. but you can delete the file afterward.

basically it is the same so you put the after_update code in your payment section and associate the name.

just remove the popup code: Dim dbPath As String Dim OldDbName As String Dim NewDbName As String Dim DbBackup As String Dim Response As Integer Dim fs As Object dbPath = Application.CurrentProject.path OldDbName = "OldDatabaseName.mdb" NewDbName = "BackUp" & "_" & Format(Date, "yyddmm") &...

Thank Simon, but how about if the file is really big? i mean if its exceeding the string max value?

Hi there again! hows ur weekend? :D i got error in it " type mismatch " in Set XL = GetObject("C:\WorkbookName.xls")

thank! i will try it and for sure will get back to you! :D

Hi just wrote the code for you, hope its working: assuming the name of listbox is list0 the name of table is tablename the name of fieldname is fieldname Dim ValueToBeAdded As String Dim varItem As Variant ValueToBeAdded = "" For Each varItem In Me![List0].ItemsSelected...

ok i will use msword for now. thank!! hmm another question, can i do this also for excel file instead of access?

ouch thank! thats hit me on the head :D another question, right now i use MSWORD to find and replace in txt file. do you know the better way to do it?

how can i delete the macro in other db?

just make label/ textbox next to combo box. after update of combo box copy this code Private Sub Combo0_AfterUpdate() Label2.Visible = True End Sub and in open form: Private Sub Form_Open(Cancel As Integer) Label2.Visible = False End Sub

Thank for the tips. Do you know if i can use Application.SaveAsText and Application.LoadFromText from other database? like Set msACC = GetObject(dbname) mcACC.LoadFromText ? or mcACC.SaveAsText ?