SAP 获取本机信息（IP及电脑名称）

小飞猪猪猪猪猪猪猪

已于 2022-08-24 15:37:23 修改

阅读量1.2k

点赞数 1

分类专栏：开发知识点文章标签： tcp/ip 网络服务器

于 2022-08-23 17:49:04 首次发布

本文链接：https://blog.csdn.net/jyh1999/article/details/126489974

版权

开发知识点专栏收录该内容

50 篇文章 6 订阅

订阅专栏

导语：最近在做日志的东西，需要记录用户的IP，以及电脑名称，找了一下，SAP有两个类可以实现。

一、效果展示

在这里插入图片描述

二、代码

*&---------------------------------------------------------------------*
*& Report Z_JYH_TEST
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT z_jyh_test.

DATA : ip            TYPE char20.
DATA : computer_name TYPE string.

"获取IP地址
CALL METHOD cl_gui_frontend_services=>get_ip_address
  RECEIVING
    ip_address           = ip
  EXCEPTIONS
    cntl_error           = 1
    error_no_gui         = 2
    not_supported_by_gui = 3
    OTHERS               = 4.
    
CALL METHOD cl_gui_cfw=>flush.
WRITE: / '本机IP:', ip.

"获取电脑名称
CALL METHOD cl_gui_frontend_services=>get_computer_name
  CHANGING
    computer_name        = computer_name
  EXCEPTIONS
    cntl_error           = 1
    error_no_gui         = 2
    not_supported_by_gui = 3
    OTHERS               = 4.

CALL METHOD cl_gui_cfw=>flush.
CALL METHOD cl_gui_cfw=>update_view.
CONDENSE computer_name.

WRITE: / '电脑名称:', computer_name.