HELP HELP HELP!!!

2004-04-05 09:58:08 100 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

雷光联动自动化标校方法动态标校需要利用动目标，在雷达和光电同时看到目标时记录光电的方位、俯仰，以及利用雷达给的目标信息计算的方位俯仰，手动记录两者的数值，多方位，多距离段记录，费时费力，且人工记录数据不全，计算容易出差错，耗费成本和精力太大。目标相距设备的水平距离 = acos(cos(设备纬度弧度值) * cos(目标纬度弧度值) * cos(设备经度弧度值 – 目标经度弧度值) + sin(设备纬度弧度值) * sin(目标纬度弧度值)) * 6378137;本发明涉及光电技术领域，安防领域，尤其涉及雷达光电动态标校等。阅读详情

这是我第三遍提这个问题了，怎么办啊！帮帮我
我用于发邮件的是IMAIL

我写了asp自动发信，很简单的语句，
<%Set MailObject = Server.CreateObject("CDONTS.NewMail")
MailObject.From="iddcm@some.com"
MailObject.To=mail
MailObject.Subject="发送邮件"
MailObject.Body="发邮件"
MailObject.Send%>

以前都是可以运行的，昨天突然不行了，出现的错误如下：
主要出现在这个语句：MailObject.Send

页面上显示的错误如下：

Microsoft VBScript 编译器错误错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp，行242
Microsoft VBScript 运行时错误错误 '800a0046'
没有权限
/iddcm/CABWRITE/aa.asp，行41

请问这是什么原因啊？能帮帮我吗？

有人让我试试下面的方法，
regsvr32 C:\WINNT\system32\CDONTS.DLL
再重启
我试过了，好像没有用的啊
怎么办呢？

...全文

医用超声图像模拟系统算法：空间分辨率详解医用超声图像模拟系统中的空间分辨率，是连接物理原理、信号处理算法和最终图像质量的桥梁。通过精确模拟从声场发射、组织相互作用到信号接收和图像重建的全链条过程，并运用先进的波束形成、解卷积和超分辨率算法，我们可以不断逼近并突破物理极限，为开发下一代高分辨率超声成像系统提供强大的算法验证平台和数据集来源。未来的趋势将是更高保真度的物理模拟、更智能的自适应算法与数据驱动方法的深度融合。阅读详情

jerry7981

ASP 28,401 成员 356,940 内容

+ 关注 + 加入社区

切换为时间正序

jerry7981 2004-04-05

打赏
举报

真的解决了！谢谢sheng9hhd(无形)！

jerry7981 2004-04-05

打赏
举报

lawdoor(风语者) 这个和我那个差不多啊，就是比我那个复杂一点而已。我需要解决的是不能发送邮件而不是其他的问题。大家有没有遇上过这种问题啊？

dotnet东哥 2004-04-05

打赏
举报

原因
如果连对 SMTP 邮件服务器文件夹的“更改”权限都未授予匿名用户帐户，则可能会发生此问题。
解决方案
要解决此错误，请按照下列步骤操作：
1.打开 Windows NT 资源管理器并浏览到邮件文件夹。默认情况下，它是X:\InetPub\MailRoot 文件夹，其中 X:是您在安装 NTOP 期间指定的驱动器。
2.右键单击 Pickup 文件夹，然后单击属性。
3.在安全选项卡上，单击权限。
4.如果列出了 IIS 用户帐户，则 IUSR_<计算机> 和 IWAM_<计算机> 将是默认计算机，请跳转到第 13 步。
5.单击添加。
6.在列出的名称来自: 下拉菜单中选择您的计算机。
7.单击显示用户。
8.突出显示 IUSR_<计算机> Internet 来宾帐户和 IWAM_<计算机> 模拟帐户，然后单击添加。
9.单击访问类型下拉菜单中的更改。
10.单击确定关闭“添加用户和组”对话框。
11.单击确定关闭目录权限对话框。
12.单击确定关闭目录属性对话框。
13.对 MailRoot 文件夹中的每个文件夹重复第 2 步到第 12 步。

适用于:
Microsoft Internet Information Server 4.0

dotnet东哥 2004-04-05

打赏
举报

http://support.microsoft.com/default.aspx?scid=kb;EN-US;197619

dotnet东哥 2004-04-05

打赏
举报

这是权限问题！

jerry7981 2004-04-05

打赏
举报

一定要换成jmail吗？不可以用imail吗？

lawdoor 2004-04-05

打赏
举报

<%
FromWho = "shop"
FromMail="zdsc@sina.com.cn"
ToWho = Request("name")
ToMail = request("Email")
'建立一个CDONTS.NewMail对象
Set objMail = Server.CreateObject("CDONTS.NewMail")
'设置寄件人
objMail.From = FromWho & "<" & FromMail & ">"
'设置收件人
objMail.To = ToWho & "<" & ToMail & ">"
objMail.cc = "zdsc@topoint.com.cn"
'设置邮件主题
objMail.Subject = "申请成功"

'设置邮件内容
content = "<body bgcolor=""#FFFFE8"">"
content = content & "尊敬的用户["&name&"]：您好!" & " "
content = content & " "
content = content &"　　你已成功申请了我们的服务,以下是你的注册资料,如有错误,请到后台管理系统中进行修改。" &" "
content = content & " "
content = content & "全称：" & shop_Name1 & " "
content = content & "简称：" & shop_Name2 & " "
content = content & "人：" & name & " "
content = content & "密码：" & pwd & " "
content = content & "公司电话：" & usephone & " "
content = content & "公司地址：" & haddr & " "
content = content & "邮编：" & postcode & " "
content = content & " "
content = content & " "

objMail.Body = content
'将邮件格式设成HTML，若这两行省略，则使用默认的TXT格式。
objMail.BodyFormat = 0
objMail.MailFormat = 0
'寄出邮件
objMail.Send
set objMail=nothing

madpolice 2004-04-05

打赏
举报

不用CDONTS

换成JMAIL，并设置发信身份验证

HELP HELP HELP!!!

相关推荐