Go Premium for a chance to win a PS4. Enter to Win

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 337
  • Last Modified:

I have an web server (IIS) on my network, hosting several sites . What I need to do to access this sites from the local network?

Hi,

I have a Web server hosting some websites and I can't acces this sites from the local network.
I have 10MB ADSL access - The router si conected to port 1 of my switch and al the computers and the server to the same switch

It's working well when somebody access the webpages from outside but I can´t see the pages from local network.

I put the server local IP (192.168.1.33) in the DMZ inside the router and I also added port forwarding setings inside the router like TCP 80 ---> 192.168.1.33 ...

The problem is that one of the sites (script -> ASP) use CDO for sending emails.
It's work nice but when the site try to send a local page via email I get an error:

CDO.Message.1 error '80040218'

Unknown Error

/mailpp_sunsizbor.asp, line 36
 

<%
 
Dim objConfig,smarthost,msgBody 
set Mail = createobject("cdo.message")
set objConfig = createobject("cdo.configuration")
 
msgBody = "http://sunsizbor.com/mail_s_11.asp?nume=" & tName & "&user=" & tEmail 	
 
smarthost = "127.0.0.1"
' Setting the SMTP Server
Set Flds = objConfig.Fields
Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = smarthost
Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = cdoBasic 'cdoAnonymous ' =0 
Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "info"
Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "*********" 
Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 
Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = False
Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
 
 
Flds.update
 
Set Mail.Configuration = objConfig
Mail.To = temail
'mail.BCC = ""
Mail.From = "info@sunsizbor.com"
Mail.Subject = msgSubject
Mail.CreateMHTMLBody msgBody         ' THIS IS LINE 36
Mail.fields.update
Mail.Send
 
set objConfig = nothing
 
 
Set Mail = Nothing
End Function
%>

Open in new window

router.jpg
0
cardei80
Asked:
cardei80
  • 2
1 Solution
 
rizwanidreesCommented:
Have you checked DNS entries for locally hosted domains in your DNS Server?
0
 
cardei80Author Commented:
I don´t have a DNS Server role installed on the local server.
The DNS service that I use is provided by the domain registrand company.
There in the control panel of this company I set the ip 80.37.xx.xx (my static iP) for A, MX, WWW, FTP, MAIL ...

I have to install a DNS server role in this case?
How I need to configure this ??
Thanks
0
 
rizwanidreesCommented:
If you have Domain controller installed installed in your network than there must be a DNS server role also. and all request from your local network go to your local dns server first than forwarded to router
0

Featured Post

[Webinar] Cloud and Mobile-First Strategy

Maybe you’ve fully adopted the cloud since the beginning. Or maybe you started with on-prem resources but are pursuing a “cloud and mobile first” strategy. Getting to that end state has its challenges. Discover how to build out a 100% cloud and mobile IT strategy in this webinar.

  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now