|
what i'm trying to do is send emails from vb that have a custom attachment based on the fields in an access database each email is sent to a different person and the attachment will be different for each person, the code i'm using so far is
Set cdomsg = CreateObject("CDO.message")
With cdomsg.Configuration.Fields
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = 465
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "xxx"
.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "xxx"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
.Update
End With
If Not (r.EOF And r.BOF) Then
r.MoveFirst
Do Until r.EOF = True
email = r.Fields("EmailAddress")
name = r.Fields("Firstname")
With cdomsg
.To = email
.FROM = "I@dontThinkThisIsUsed.com"
.Subject = "Test email " + name
.TextBody = "message"
.Addattachment "attachment loaction.docx"
.Send
End With
r.MoveNext
Loop
hope this helps thanks
I can send the emails but not the custom attachments
|
|
|
|
|
Member 9865508 wrote: I can send the emails but not the custom attachments
For that you'll have to modify the documents before sending. Am I looking at VBA or VB6? Either way, both aren't really suited to modify docx-files. I suggest you move to VB.NET, and write a small console-application that can display the contents of a docx-file.
If you can display it, you can change it.
Bastard Programmer from Hell 
If you can't read my code, try converting it here[^]
|
|
|
|
|
Unfortunatly not really an option and it needs to be automated otherwise it sort of defeats the purpose,I have found code that can create a mail merge and with a few major modifications can save the mail merge as seperate documents which could then be attached to the individual message but it is messy and not really sure if it will even work, just wondering if anyone has actually tried this before.
|
|
|
|
|
Member 9865508 wrote: Unfortunatly not really an option
Trying this in VBA or VB6 will be more challenging.
Member 9865508 wrote: just wondering if anyone has actually tried this before.
In a programming language; yes. It'd also be doable from VBA if it were a text-file, but manipulating a .docx-file will be a fair bit harder.
Bastard Programmer from Hell
If you can't read my code, try converting it here[^]
|
|
|
|
|
I have date:
Start= 2013-18-03 09:00:00 AM
End = 2013-19-03 03:00:00 PM
What if the day is calculated starting from 12:00:00 PM?
i try this code:
Dim start As DateTime
Dim enday As DateTime
start = "03/18/2013 09:00:00 AM"
enday = "03/19/2013 03:00:00 PM"
Dim span As TimeSpan
span = enday.Subtract(start)
MsgBox(span)
but the result is 1 day, it should be 3 days. Could you give me the suggestion? 
modified 18-Mar-13 10:44am.
|
|
|
|
|
Akbarblack wrote: start = "03/18/2013 09:00:00 AM"
enday = "03/19/2013 03:00:00 PM"
I have a question which is - how can the difference between the 19th of March and the 18th of March possibly be three days irrespective of when the day starts?
“That which can be asserted without evidence, can be dismissed without evidence.”
― Christopher Hitchens
|
|
|
|
|
|
Not the most elegant solution I've ever come up with, but off the cuff this should do it...
Dim dt1 As DateTime = "1/1/2013 9:00 AM"
Dim dt2 As DateTime = "1/2/2013 12:00 PM"
Dim days As Integer = 0
days += (dt2 - dt1).Days
If dt1.Hour < 12 Then
days += 1
End If
If dt2.Hour >= 12 Then
days += 1
End If
|
|
|
|
|
|
I'm having a bunch of boolean properties that's going to be stored in bytes in a file.
I'm not having any problems doing it, (adding multiples of two), I just wonder if there is any best practice?
"The ones who care enough to do it right care too much to compromise."
Matthew Faithfull
|
|
|
|
|
|
Bitvector32 looks interesting, I'll have a look at it tomorrow when I have gotten some sleep.
"The ones who care enough to do it right care too much to compromise."
Matthew Faithfull
|
|
|
|
|
where I found tutorial about direct x9 sprite
|
|
|
|
|
Have you heard of Google[^]?
Use the best guess
|
|
|
|
|
|
|
It was a perfectly reasonable answer to the question. He asked "Where can I find...", so a search engine is a reasonable answer. If the OP types his exact question into Google, he shall find examples.
|
|
|
|
|
I have spent a lot of time trying to find either a free or low cost ($10's) multiple column combobox or list box for visual basic.
I feel I am going to have to bite the bullit and build one from scratch in C++, but before I do that. Has anyone any idea why the version in vba (access and excel) has never been ported across to VB.
In fact does anyone know if the source code for these exist anywhere where it can be reused.
I feel this is a real lack in visual studio 2012, as there are other development languages and IDE that give you this functionality for a lost less $'s
|
|
|
|
|
A multi-column combo box does not really make sense. For lists you have the ListView Class[^].
Use the best guess
|
|
|
|
|
I understand what you say about the listview, but for a simple way to bind a data source via a bindingsource to a simple dropdown control where you select the binding source and columns to display and a member to be used a value member.
I can understand it would a big job if these components did not already exist, espically in a lesser powerful products
|
|
|
|
|
Simple drop down controls are specifically designed to use only a single column. If you want something that does not currently exist you need to extend an existing control, or write a new one.
Use the best guess
|
|
|
|
|
hello dear all the best programmer,
this is my first posting or maybe a question but hopely although i am the beginner and newbie in vb .net you would like to help for solving my problem.
i get some problem when i was making a report application with crystal report in vb.net using sql server database. i make simple application that consist one button "show report" and one crystal report viwer. i put code to the button "show report" :
<pre lang="vb">Imports CrystalDecisions.CrystalReports.Engine
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim cryRpt As New ReportDocument
cryRpt.Load("Data Source=(localdb)\Projects;Initial Catalog=crystaldb;Integrated Security=True")
CrystalReportViewer1.ReportSource = cryRpt
CrystalReportViewer1.Refresh()
End Sub
End Class</pre>
and when i run the program, actually there is no problem but why i must first ly to do an action login. the action login consist of some field , they are server name, databse , id and pasword. the server name was automatically filled and the database field was empty and but i can't fill in it. and for id and password that were empty to and i must and able to fill that.
for the id and pasword field, i don't know what thing i must to fill in that field. hopely anybody can understand my question and problem clearly and as soon as possible would like to help me.
thanks and best regards,
toni firnandes.
|
|
|
|
|
Edit your post and move the PRE tags so they only surround your code block, NOT your text. Right now, your post text is so wide that nobody can read it without copying the entire post into notepad.
|
|
|
|
|
Hi!
I have this Visual Basic project with textboxes. I don't want users to be able to type in the textboxes, but only use the USB-barcodescanner instead.
I've tried several keypress/keydown options, but every time the keyboard is blocked, there's also no input possible with the scanner...
Any pointers? Anyone?
Thanks!
Martijn
|
|
|
|
|
Sounds like the scanner is using "keyboard wedge" data transfer where it places the data in the same buffer as the keyboard, hence if the keyboard is blocked, then the scanner will be blocked.
What you really need is the scanner to send it's data to something like the serial port or USB port.
Your program would make all of the input text boxes read-only and you would monitor the port for incoming data and populate the necessary text boxes.
Basically you want to get away from keyboard wedge and see if the scanner vendor provides a library to access the device via some USB port.
Good luck.
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
