sheida-peyravi
شنبه 12 آبان 1386, 14:04 عصر
چطور می شود از طریق یک فرم اطلاعات DataBase را به آدرس ایمیل مورد نظر ارسال کرد؟
من کد زیر را نوشته ام لطفا یک نفر به من کمک کنه چون نمیدونم از چه DLL ای و چگونه استفاده کنم تا عمل ارسال ایمیل انجام بگیرد ؟
من بر روی کامپیوتر شخصی ام کار می کنم.
create a mailman to send email.
در این خط خطا می گیرد. 'Dim mailman As New chilkat.MailMan()
'mailman.unlockcomponent("unlockcode")
'Set your smtp server hostname
'mailman.smtphost = "smtp.earthlink.net"
'you may need this depending on your smtp server
'mailman.smtpusername="username"
'mailman.smtppassword="password"
'create the mailman
در این خط خطا می گیرد. 'Dim email As New chilkat.email()
'email.subject = "Resault"
'email.body = "" 'Dim conn As SqlConnection = New SqlConnection("workstation id= ;packet size=4096;user id= ;data source= ;persist security info=True;initial catalog=- ;password=kkk")
'Dim cmd As New SqlCommand
'cmd.Connection = conn
'cmd.CommandType = CommandType.StoredProcedure
'cmd.CommandText = "usp_TB_Article_Delete"
' cmd.Parameters.Add("@RecordID", System.Data.SqlDbType.Int)
' cmd.Parameters("@RecordID").Value = row
'Try
'conn.Open()
'cmd.ExecuteNonQuery()
'conn.Close()
'Catch ex As Exception
'MsgBox(ex.Message)
'End Try
'email.addto("آموزشکده آمار وانفورماتیک تهران", "Sheida_peyravi2000@yahoo.com")
'email.addcc(" ", " ")
'email.fromaddress = "sheida_peyravi2000@yahoo.com"
'email.fromname = "آموزشکده آماروانفورماتیک تهران"
'send email
'If (Not mailman.sendemail(email)) Then
'MsgBox("ایمیل ارسال شد.")
' End If
'End If
2- در قسمت Add connection برای برقراری ارتباط بین Application و Database در بخش Server name چه باید بنویسیم ؟
من کد زیر را نوشته ام لطفا یک نفر به من کمک کنه چون نمیدونم از چه DLL ای و چگونه استفاده کنم تا عمل ارسال ایمیل انجام بگیرد ؟
من بر روی کامپیوتر شخصی ام کار می کنم.
create a mailman to send email.
در این خط خطا می گیرد. 'Dim mailman As New chilkat.MailMan()
'mailman.unlockcomponent("unlockcode")
'Set your smtp server hostname
'mailman.smtphost = "smtp.earthlink.net"
'you may need this depending on your smtp server
'mailman.smtpusername="username"
'mailman.smtppassword="password"
'create the mailman
در این خط خطا می گیرد. 'Dim email As New chilkat.email()
'email.subject = "Resault"
'email.body = "" 'Dim conn As SqlConnection = New SqlConnection("workstation id= ;packet size=4096;user id= ;data source= ;persist security info=True;initial catalog=- ;password=kkk")
'Dim cmd As New SqlCommand
'cmd.Connection = conn
'cmd.CommandType = CommandType.StoredProcedure
'cmd.CommandText = "usp_TB_Article_Delete"
' cmd.Parameters.Add("@RecordID", System.Data.SqlDbType.Int)
' cmd.Parameters("@RecordID").Value = row
'Try
'conn.Open()
'cmd.ExecuteNonQuery()
'conn.Close()
'Catch ex As Exception
'MsgBox(ex.Message)
'End Try
'email.addto("آموزشکده آمار وانفورماتیک تهران", "Sheida_peyravi2000@yahoo.com")
'email.addcc(" ", " ")
'email.fromaddress = "sheida_peyravi2000@yahoo.com"
'email.fromname = "آموزشکده آماروانفورماتیک تهران"
'send email
'If (Not mailman.sendemail(email)) Then
'MsgBox("ایمیل ارسال شد.")
' End If
'End If
2- در قسمت Add connection برای برقراری ارتباط بین Application و Database در بخش Server name چه باید بنویسیم ؟