title image


Smiley OEM nach ANSI
(Sowohl der OEM/DOS- als auch der ANSI-Zeichensatz sind ASCII-Zeichensätze, die ASCII-Definiton umfasst nur die unteren 7 Bit des Zeichens!)das geht so:Private Declare Function OemToChar Lib "user32" Alias "OemToCharA" _ (ByVal lpszSrc As String, ByVal lpszDst As String) As LongPublic Function strOEMToAnsi(S As String)Dim RetVal, Res As String * 1024 RetVal = OemToChar(S, Res) strOEMToAnsi = Mid$(Res, 1, Len(S))End FunctionReinhard


Gruß aus dem Norden
Reinhard


Bitte immer die Access-Version angeben!
DB-Wiki


Wie man Fragen richtig stellt

YaccessAccess-FAQUnd ansonsten: Wikipedia




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: