写一段易语言上传阿里云oss代码

在易语言中，上传文件到阿里云OSS（Object Storage Service）需要先设置相关的访问凭证，然后使用阿里云提供的SDK。以下是一个简单的示例，假设你已经安装了易语言的OSS SDK并设置了Access Key ID、Access Key Secret以及Bucket名称：

; 引入阿里云OSS SDK
Import Alibaba.OSS

; 设置OSS配置
Local ossConfig := NewOSSClientConfiguration()
ossConfig.AccessKeyId := "your_access_key_id"
ossConfig.SecretAccessKey := "your_secret_access_key"
ossConfig.Region := "your_region" '如：oss-cn-hangzhou

; 创建OSS客户端
Local client := NewOSSClient(ossConfig)

; 定义要上传的本地文件路径
Local filePath := "path_to_your_file"

; 获取文件大小
Local fileSize := FileGetSize(filePath)

; 创建存储对象，包含文件名和bucket
Local object := NewPutObjectRequest("your_bucket_name", Path.GetFileName(filePath))

; 开始上传
object.ContentLength = fileSize
client.PutObject(object, filePath)

; 检查上传是否成功
If object.LastModified Then
   PrintLn("文件已成功上传至OSS")
Else
   PrintLn("上传失败，请检查网络和权限")
EndIf

; 关闭连接
client.Close()