ms-access

问题 I am trying to create an App in Microsoft Access 2007. How can I silently send an email out using Outlook 2007 upon a specific event without any user interaction. How should I approach this. If you can provide some VBA some it would be extremely nice, but if not, could you guide me in how to accomplish this? 回答1: I was able to solve my problem with the following code: Public Sub SendEmail() Email_Bcc = "email@domain.com" Email_Body = "Email body!!!!" Email_Subject = "Email Subject" On Error

问题 I have this vba code and I don't understand why it return error me.ID is stored as string btw Private Sub ID_AfterUpdate() Dim db As DAO.Database Dim rs As DAO.Recordset Me.ID = UCase(Me.ID) Set db = CurrentDb Set rs = db.OpenRecordset("Products") rs.FindFirst ("[SKU] =""" & Me.ID & """") //this is the one giving error If Not rs.NoMatch Then MsgBox ("SKU Existed") Me.ID.Value = Null Me.Next.SetFocus //just for the sake of moving to this field then Me.ID.SetFocus //to this field coz sometimes

问题 I am new to Excel VBA. I have a UserForm in which I am trying to populate records of exception entered by employee for the current month. I have a database called Ofc. Under which I have a table Codeusage. Primary key is Sno . Here is Name of fields in table Codeusage details the structure and Records saved. Objective: For example if I want to see all exceptions 43243312 has updated for the month of Oct then it should show three records. The contents of the Codeusage table: Sno PeoplesoftId

问题 I have a database schema generated in a text file (DDL - MS Access compliant). Where is the option in MS Access to import that schema into an empty database ? 回答1: I'm not aware of any import for DDL. However, DDL contains the definition for the schema. You simply have the execute DDL as you would any query. Either create a query, put it in sql mode, paste your ddl, and execute or.... Create a VBA Sub to essentially do the same: currentdb.execute SQL Good Luck 回答2: To execute a SQL DDL in the

问题 BACKGROUND: I've been trying to streamline the work involved in running a report in my program. Lately, I've had to supply a listing of job numbers an instrument has been used on with the listing of items for cost/benefit analysis. Mostly to see how often an instrument is used since it was last serviced/calibrated and the last time anyone did use it. I was looking to integrate this into the query that helps generate the report - but I keep hitting a brick wall of sorts with the number of uses

问题 So i have a field that datatype is a text which is feed into the database. What it returns is something along the lines of this: ddd MMM dd hh:mm:ss yyyy What i would like for it to do is be displayed as something like this: ddd MMM dd yyyy hh:mm:ss I can achive this by using Format() which would look like this: Format(alarmdet.AlarmStart, "ddd MMM dd yyyy hh:mm:ss) AS AlarmDateTime So that is all well and good, however; i want to beable to convert this value into a datetime. I've tried using

问题 I have an access query that I need to have converted to Oracle. And in access, it uses an inner join that is within an inner join. I am not an expert at any of this, but I only learned Oracle to an extent and practically nothing in access. (and is not my access string either (creator of it died a year back)). And I have no choice in its conversion to oracle... it just needs to get done. :/ anyhow... here is the string: UPDATE AIRMODEL_NETWORK_SUMMARY INNER JOIN (HISTORY_BOL INNER JOIN PERIOD

问题 I have the following array that contains ticker symbols: Public Shared tickerArray() As String = {"GOOG", "AAPL", "V", "MSFT"} . I need to use this loop: For Each tickerValue In Form1.tickerArray to load the csv file for each ticker symbol into one large table in Microsoft Access. The csv files are located at "http://ichart.yahoo.com/table.csv?s=" & tickerValue . I also need the respective ticker symbol to be loaded into each line of the table that is imported from the csv file in order to

问题 Edited) is this right? I need to do the same thign for column P. Should I do another for loop? Dim i As Long For i = 1 To Rows.Count If Len(Cells(i, "Q").Value) <= 4 Then Cells(i, 1).NumberFormat = "01/01/yyyy" Else: Cells(i, "Q").NumberFormat = "MM/DD/YYYY" End If Next i When I import excel file to access, the column that has either the years(19xx) or a full date don't display properly after imported. The years seem fine but full date is changed to a random number like 39213, etc. So I tried

问题 I'm trying to write a macro to export a single row from a single worksheet from an Excel 2003 workbook to a new row in an Access 2003 table. I'm new to VBA, and everything I've found on the web refers to going the other way -- from Access to Excel. I want this to be an export, not a link, and I don't care about keeping them synced after the export. 回答1: This sample code assumes a few things: You are inserting two values, which are found in A2 and B2. The values are both strings You have a