能否编写脚本为Oracle程序选择输入框自动设置固定值？

完全可以实现非自动点击类的自动选中逻辑，以下三类方案都不需要模拟鼠标点击操作，不会受窗口位置、界面分辨率影响，稳定性远高于自动点击脚本：

• 基于Oracle程序原生接口的方案（最合规，优先选）
  你提到的这类简易Oracle录入程序大多是基于Oracle Forms开发的客户端，本身自带表单字段赋值接口，不需要操作UI选择控件：

  1. 先确认门店选择字段对应的块名、字段名，以及你需要固定选中的门店对应的编码值
  2. 如果有表单修改权限，直接在表单的新建实例触发器里写PL/SQL赋值逻辑，打开录入界面就会自动填充合规的门店值，核心代码如下：

  -- 替换为实际的块名、字段名、门店编码
  :CUS_REGISTER_BLOCK.STORE_ID := '023';
  -- 触发字段自带的校验规则，避免赋值不符合程序校验逻辑
  EXECUTE_TRIGGER('WHEN-VALIDATE-ITEM');
  

  如果没有表单修改权限，可以找企业内部的Oracle运维人员加个个人级的默认值配置，不需要改全局程序。

• 基于Windows控件消息的本地方案（无程序修改权限时用）
  这类下拉选择控件是Windows标准控件，不需要模拟点击，直接给控件发标准选中消息就能后台完成选择，不会抢占鼠标焦点，窗口被遮挡也能正常运行：

  1. 用Spy++这类系统工具抓到门店下拉控件的句柄，确认目标门店的完整显示文本
  2. 写轻量脚本调用Windows API发送CB_SELECTSTRING消息，直接匹配目标门店文本完成选中，以PowerShell为例的核心逻辑：

  Add-Type -TypeDefinition @"
  using System;
  using System.Runtime.InteropServices;
  public class Win32 {
      [DllImport("user32.dll", CharSet = CharSet.Auto)]
      public static extern IntPtr SendMessage(IntPtr hWnd, uint Msg, IntPtr wParam, string lParam);
  }
  "@
  $CB_SELECTSTRING = 0x014D
  # 替换为实际抓到的控件句柄、目标门店名称
  $controlHwnd = [IntPtr]123456
  $targetStoreName = "XX路注册门店"
  [Win32]::SendMessage($controlHwnd, $CB_SELECTSTRING, [IntPtr]-1, $targetStoreName)
  

• 数据库层面直写方案（效率最高，适合有数据库权限的场景）
  如果有对应业务表的写入权限，可以完全绕开前端选择步骤：提前写好固定的SQL脚本，录完消费者ID后一键执行，直接把消费者ID和固定门店的关联关系写入业务表，连前端控件都不需要操作。执行前需要和DBA确认表结构、约束关系，补全必填的审计字段（创建人、创建时间、操作来源等）即可。

注意：上述所有方案都不涉及模拟鼠标移动、点击的操作，所有赋值逻辑要么走程序原生接口、要么走系统标准控件消息、要么走合规数据库写入，不会被常规终端审计判定为违规的自动点击类外挂。

内容的提问来源于stack exchange，提问作者Nick