PB初心者の佐々木と申します。

早速ですが、ドメインユーザのパスワード初期化のアプリを作成しております。
VBでのAPI（NetUserSetInfo）を使用した裏付けはとってあります。

<>
NET_API_STATUS NetUserSetInfo(
  LPWSTR servername, 
  LPWSTR username,   
  DWORD level,       
  LPBYTE buf,        
  LPDWORD parm_err   
);

VBソース
　割愛させていただきます。

そのVBソースを参考にPBへ移行しておりますが、servername指定に
誤りがあるらしく、エラーになってしまいます。

PBソース
<<ユーザオブジェクト(c_netusersetinfo) Local External Functions>>
Function Long NetUserSetInfo &
    ( Blob servername, &
      Blob username, &
      Long Level, &
      Any  UserInfo, &
      Ref Long   ParmError)  LIBRARY \"netapi32.dll\"

<<構造体(user_info_1003)>>
データ型:String 変数名:usri1003password

<<ウィンドウ ボタンclicked>>
string strdomain, struser, strpasswd
Blob blbdomain, blbuser, blbpasswd
long l,lngparaerr
any anypasswd
ulong mem_addr

user_info_1003    udtUserInfo1003
c_netusersetinfo  valnetusersetinfo

valnetusersetinfo = create c_netusersetinfo

strdomain = \"\\\\som-pdc\"
blbdomain = ToUnicode( strdomain )

struser = \"sasaki\"
blbuser = ToUnicode( struser )

strpasswd = \"sasaki\"

udtUserInfo1003.usri1003password = strpasswd

l = valnetusersetinfo.NetUserSetInfo( blbdomain, &
  blbuser, & 
  1003, &
  udtUserInfo1003, &
  lngparaerr )

結果(l):53

LPWSTRはblobで合っているのでしょうか？。また、unicodeの変換も正しく行われているか不安です。

わかりづらい説明で申し訳ありませんが、ご存知の方宜しくお願い致します。

過去の内容等調べさせて頂きましたが、