posts - 116,  comments - 34,  trackbacks - 0

web 服务其实就是我们说的web service,用户通用模块,或是是通用数据的。

在项目里面添加一个web服务,然后在和写模块一样的,如果是要给别人调用的模块最好是可以返回参数的function,然后别人在引用这个服务,根据返回参数来判断程序的执行情况。

实例:
Imports System.Web.Services

<System.Web.Services.WebService(Namespace := "http://tempuri.org/SMS/WebSignServiceClass")> _
Public Class WebSignServiceClass
    Inherits System.Web.Services.WebService

#Region " Web 服务设计器生成的代码 "

    Public Sub New()
        MyBase.New()

        '该调用是 Web 服务设计器所必需的。
        InitializeComponent()

        '在 InitializeComponent() 调用之后添加您自己的初始化代码

    End Sub

    'Web 服务设计器所必需的
    Private components As System.ComponentModel.IContainer

    '注意: 以下过程是 Web 服务设计器所必需的
    '可以使用 Web 服务设计器修改此过程。
    '不要使用代码编辑器修改它。
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
        components = New System.ComponentModel.Container()
    End Sub

    Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
        'CODEGEN: 此过程是 Web 服务设计器所必需的
        '不要使用代码编辑器修改它。
        If disposing Then
            If Not (components Is Nothing) Then
                components.Dispose()
            End If
        End If
        MyBase.Dispose(disposing)
    End Sub

#End Region

    ' Web 服务示例
    ' HelloWorld() 示例服务返回字符串 Hello World。
    ' 若要生成项目,请取消注释以下行,然后保存并生成项目。
    ' 若要测试此 Web 服务,请确保 .asmx 文件是起始页
    ' 并按 F5 键。
    '
    '<WebMethod()> _
    'Public Function HelloWorld() As String
    '   Return "Hello World"
    'End Function


End Class

这是添加一个服务时的情况,在里面加一些给别人调用的模块。
调用时:
先在项目引用web服务,比如引用登陆服务:
 Dim wr As WebReference.EipUserServices = New WebReference.EipUserServices

        Dim errmess As String = wr.EipUserLogonCheck(Me.TextBox1.Text, Me.TextBox2.Text, "SIGN-1")
        If errmess = "OK" Then
。。。。。
 Else
            Page.RegisterStartupScript("111", "<script>alert('" + errmess.Trim + "');</script>")
            sjs()
            Exit Sub
        End If
        Response.Redirect("JM/Main.htm", True)
        Response.End()
可能表达不是很清楚,有问题请留言,谢谢

posted on 2005-10-25 15:48 萌芽的叶子 阅读(235) 评论(0)  编辑 收藏 引用 所属分类: 私人程序片断共享程序片断
只有注册用户登录后才能发表评论。

<2005年10月>
2526272829301
2345678
9101112131415
16171819202122
23242526272829
303112345

常用链接

留言簿(3)

随笔分类(115)

随笔档案(116)

文章分类(4)

相册

收藏夹(78)

.net中文社区

.net博客

.net英文社区

AJAX

ASP.NET 2.0

ASP.NET 学习

DataBase

ERP

E杂志

Html&Css

JavaScript

Microsoft

Open Sourse

SAP

WebCasts

WebServices

XML

其他

好友Blog

好文章连接

开发工具

控件

物流

职业经理人

设计模式

读书网站

非技术

项目管理

搜索

  •  

积分与排名

  • 积分 - 56858
  • 排名 - 108

最新评论

阅读排行榜

评论排行榜