|
Like Colin said, this is MIT research stuff and FAR beyond the scope of what anyone here can explain to you in the forums.
You're only source of information is going to be Google and sites and University classes dedicated to the subject.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
I want to send an email to a number of people. The people I want to send to are stored in a database table. I want to send an email that includes a message and includes an OrderNumber which is stored in the database table. The recipients email address is stored in the database table also.
I am not sure what way to retrieve the information and to send it. I think I should read the information from the table using a sql query such as:
Param = SqlCom.Parameters.Add("@OrderNumber", SqlDbType.VarChar, 4)
Param.Direction = ParameterDirection.Output
Param = SqlCom.Parameters.Add("@MailAddress", SqlDbType.VarChar, 20)
Param.Direction = ParameterDirection.Output
Conn.Open()
SqlCom.ExecuteNonQuery()
Conn.Close()
OrderNumber = Trim(SqlCom.Parameters("@OrderNumber").Value)
RecipientAddress = Trim(SqlCom.Parameters("@MailAddress").Value)
I think I should read it using a loop and the send the mails to a recipient using the following code:
Dim dr As SqlDataReader
While dr.Read()
Mail.To = dr("OrderNumber").ToString()
Mail.Body = TextBox5.Text
Mail.From = "jmcconalogue"
SmtpMail.SmtpServer = "donegal-mail"
SmtpMail.Send(Mail)
End While
dr.Close()
Does anyone know if this will keep looping through the table and keep sending emails to all the recipients listed in the datbase table as there may be quite a few in the table?
Anyone a better way to do this?
macca
|
|
|
|
|
If it is the same e-mail which needs to be send to all the recipients, then why not simply compose one string containing the recipients adresses, seperated by semi-colon's and then place it in the BCC field.
So instead of
While dr.Read()<br />
<br />
Mail.To = dr("OrderNumber").ToString()<br />
Mail.Body = TextBox5.Text<br />
Mail.From = "jmcconalogue"<br />
SmtpMail.SmtpServer = "donegal-mail"<br />
SmtpMail.Send(Mail)<br />
<br />
End While
something along the line of:
dim strRecipients as string<br />
<br />
While dr.Read()<br />
<br />
strRecipients &= dr("OrderNumber").ToString() & ";"<br />
<br />
End While<br />
<br />
Mail.BCC = strRecipients<br />
Mail.Body = TextBox5.Text<br />
Mail.From = "jmcconalogue"<br />
SmtpMail.SmtpServer = "donegal-mail"<br />
SmtpMail.Send(Mail)<br />
(note that the code is just meant to be an exampel of the idea)
---------------------------
127.0.0.1 - Sweet 127.0.0.1
|
|
|
|
|
Hi,
I have a class which is used to store customer information. For each customer there may be multiple contacts. How can I record this in a collection class. I've tried to do so as follows:
<br />
' CCustomerInfo -> stores one customer record<br />
Public CompanyID As Long<br />
Public CompanyName As String<br />
Public CompanyAddress As String<br />
Public CompanyFaxNumber As String<br />
Public GeneralSupportExpiryDate As String<br />
Public HardwareSupportExpiryDate As String<br />
Public Contacts() as String <---- Error here<br />
<br />
' CCustomerInfos -> collection of CCustomerInfo objects<br />
<br />
' this is how I add objects to the collection to the class<br />
' not trying to add contacts() yet as I can't declare it correctly<br />
Public Function Add(CompanyID As Long, CompanyName As String, CompanyAddress As String, CompanyFaxNumber As String, GeneralSupportExpiryDate As String, HardwareSupportExpiryDate As String, Optional sKey As String) As CCustomerInfo<br />
<br />
Dim objNewMember As CCustomerInfo<br />
<br />
Set objNewMember = New CCustomerInfo<br />
<br />
With objNewMember<br />
.CompanyID = CompanyID<br />
.CompanyName = CompanyName<br />
.CompanyAddress = CompanyAddress<br />
.CompanyFaxNumber = CompanyFaxNumber<br />
.GeneralSupportExpiryDate = GeneralSupportExpiryDate<br />
.HardwareSupportExpiryDate = HardwareSupportExpiryDate<br />
End With<br />
<br />
If Len(sKey) = 0 Then<br />
mCol.Add objNewMember<br />
Else<br />
mCol.Add objNewMember, sKey<br />
End If<br />
<br />
Set Add = objNewMember<br />
Set objNewMember = Nothing<br />
<br />
End Function<br />
The error message is as follows:
<br />
"Constants, fixed-length strings, arrays, user-defined types and Declare statements not allowed as Public members of object modules"<br />
Can anyone suggest a way to make this work? Thanks very much in advance.
Sorry for the lengthy post!
dlarkin77
|
|
|
|
|
Well, you can't have any array inside a object you're using in a collection. You might want to try replacing that array with another collection to hold your contacts.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Try using the ArrayList class
|
|
|
|
|
good afternoon...
I just want to ask your advice regarding the following:
1. can an application or program coded in vb.net 2002/2003 with sql server as database work in linux platform? because
my client (a school) has plan of changing their windows platform to linux. is there anything i can do so that i can run a vb.net application with sql server database? what are the pros and cons IF a vb.net application with sql server run in linux?
2. what are the databases that could run both in linux and in windows? please enumerate some...
thank you in advance...
respectfully,
len_ems
|
|
|
|
|
len_ems wrote:
can an application or program coded in vb.net 2002/2003 with sql server as database work in linux platform?
If it's a desktop application then no.
If it's a web application then yes, provided that the server(s) is a Windows Server (2000 or 2003). The Linux client is then just consuming HTML.
len_ems wrote:
my client (a school) has plan of changing their windows platform to linux. is there anything i can do so that i can run a vb.net application with sql server database? what are the pros and cons IF a vb.net application with sql server run in linux?
You definitely won't be able to run a SQL Server database on anything but Windows. If you port your application to Mono, the open-source X-platform version of .NET (there are articles on the codeproject site) then you stand a chance, but again not everything will be guranteed to work. However, there are some real industrial-strength Mono applications out there, so you can probably achieve what you want with some effort.
len_ems wrote:
what are the databases that could run both in linux and in windows? please enumerate some...
MySql if you want free, otherwise, Oracle or DB2...
Kevin
|
|
|
|
|
sir,
thank you very much for your advice...
|
|
|
|
|
Hi
Can anyone tell how to include autocad in vb.net
Thanks in advance
|
|
|
|
|
It looks like google[^] knows.
The answer is bound to be COM, so look up the COM interfaces that AutoCAD exposes, and also read the articles from the google search.
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
Hi
christy i already googled it but could not find any solution if you know please send me the code for it or any url that has code which is working
Thanks in advance
|
|
|
|
|
hey, if you can't find an example that work, it is because YOU don't use'em properly  suss:
TOXCCT >>> GEII power
[toxcct][VisualCalc]
|
|
|
|
|
What works for one person might not work for another. There is no single example that is going to show you how to do this. You absolute best resource is the AutoDesk Developers site, here[^].
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Does anybody know a quick routine to convert from numbers like "1000$" to "One thousand dollars"?
I need this to print invoices
Thanks in advance
|
|
|
|
|
I found many source code hits on Google using convert number to words as the search terms. There are samples in Java, VBA, VB etc...
See if one of those is the right one for you.
...Steve
|
|
|
|
|
how can i share my folder in vb.net with "read ONLY".i have sample code but this work not correctly
Process.Start("c:\winnt\system32\net.exe", "share ShareName=C:\Path")
Please help me
kevil
|
|
|
|
|
I need explorer to open a folder so that i can view the files inside. No browsing or dialog box is needed, I just need to open that specific folder with Windows after clicking a button. Anyone knows how to do this?
Another question would be how do i declare a statement as a string if that statement has "" in it?
E.g.
Marks = "69" Grades = "C"
How do i declare the above sentence as one whole string?
|
|
|
|
|
Cx- wrote:
Another question would be how do i declare a statement as a string if that statement has "" in it?
I believe you double the quotes, as in
String s = "Marks = ""69"" Grades = "C"""
In C#, it's \", but I believe it's double quotes in VB.
Cx- wrote:
I need explorer to open a folder so that i can view the files inside. No browsing or dialog box is needed, I just need to open that specific folder with Windows after clicking a button. Anyone knows how to do this?
I'd say that ShellExecute or Process.Start will do this, just pass in the path.
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
<br />
Dim str As String<br />
str = "Marks = ""69"" Grades = ""C"""<br />
Where ever you want to put quotes inside of a string use ""
So this --> 1 "2" 3 would be coded as "1 ""2"" 3".
EDIT: Christian and I posted at the same time.
|
|
|
|
|
Anyone can help me? I try to import data contents on .csv to .sdf (SQL SERVER CE).
Best Regards...
|
|
|
|
|
What's an sdf ? You want to move a csv into a SQL Server database ? If you know the format of the file, create a table that follows it, and INSERT all the rows into it.
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
I am getting an error when debuging a program that is: "An unhandled Exception of type 'System.Runtime.InteropServices.COMException' occurred." I also see in my Event Viewer: Event ID 10020 Source DCOM. "The machine wide Default Launch and Activation security descriptor is invalid. It contains Access Control Entries with permissions that are invalid. The requested action was therefore not performed. This security permission can be corrected using the Component Services administrative tool."
This is what I have in my source code: "Dim xlBook As Excel.Workbook = xlApp.Workbooks.Add"
I have tried to give EVERYONE access to the "Microsoft Excel 97 Application" in DCOM. This had no effect on the code.
I would appreciate any suggestions or solutions for this issue.
|
|
|
|
|
Hags,
Try wrapping your code with Try/Catch (see example) to trap the error and see what additional information it gives you.
Try<br />
Dim xlApp As Microsoft.Office.Interop.Excel.Application<br />
Dim xlWkBk As Microsoft.Office.Interop.Excel.Workbook<br />
<br />
xlApp = New Microsoft.Office.Interop.Excel.Application<br />
xlWkBk = xlApp.Workbooks.Add<br />
Catch ex As Exception<br />
MsgBox(ex.Message, MsgBoxStyle.OKOnly, "Error")<br />
End Try<br />
...Steve
|
|
|
|
|
Hai,
I have seen the use of
Public sub new()
in VB.net.
What is the use of that?I will apreciate if somebody can give me a brief idea about that.
Similarly what we can use in C# instead od Public sub new().
Please show me the right way.
Thank You,
Rahul
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
